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ABSTRACT 


This  thesis  presents  a  high-resolution  stochastic  ccmfca 
simulation  model  which  will  simulate  the  effects  cf 
persistent  chemical  agent  attack  on  a  ground  force  unit.  Th 
model  is  suitable  for  inclusion  in  simulations  which  ar 
capable  cf  tracking  individual  soldiers  and  delivery  muni 
tions,  and  can  provide  explicit  ground  and  air  ageiv 
concentrations. 

This  model  will  simulate  the  immediate  measures  taker,  b 
a  soldier  in  response  to  a  direct  or  indirect  persister. 
chemical  agent  threat,  such  as  masking,  doming  protect iv 
clothing,  immediate  decontamination,  and  first  aid.  It  wil 
compute  the  dosages  received  from  multiple  agents.  Thes 
actions  are  performed  in  response  to  probabilities  an 
probability  distributions  which  are  inputs  tc  the  model. 

This  thesis  includes  an  implementation  of  the  mode 
written  in  the  SIMSCRIPT  II. 5  programming  language  fo 
inclusion  in  the  Simulation  of  Tactical  Alternativ 
Responses  (STAR)  model. 
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I.  INTRODUCTION 


The  renewed  interest  in  recent  years  concerning  the 
problems  associated  with  chemical  warfare  has  sparked  an 
interest  in  modeling  the  phenomena  and  including  such  models 
in  various  analytic  combat  models  and  combat  simulations. 
Chemical  warfare  modelling  has  become  an  essential  adjunct 
to  ccmbat  simulation.  Current  modelling  efforts  are  focused 
on  the  integrated  battlefield,  where  nuclear  and  chemical 
threats  are  presented  alongside  conventional  battles. 

A  military  chemical  agent  is  a  toxic  substance  designed 
to  incapacitate  or  kill  and  may  be  dispersed  using  a  variety 
of  delivery  means,  predominantly  indirect  fire  artillery 
and  missile  systems.  The  chemical  agent  may  be  dispersed  as 
a  li quid ,  vapor,  or  aerosol  and  can  be  classed  according  to 
it's  persistency  of  effectiveness  on  the  battlefield. 
Non-persistent  agents  are  designed  to  cause  casualties  by 
entry  into  the  body  through  the  respiratory  system.  They  are 
released  in  vapcr  or  aercsol  form,  and  generally  present 
little  percutaneous  hazard.  Persistent  agents  are  designed 
to  create  casualties  through  absorption  into  the  skin.  They 
are  released  in  a  liguid  or  liquid  aerosol  form.  Persistent 
agents  will  generally  pose  an  inhalation  hazard  as  well, 
particularly  under  conditions  favoring  evaporation  [Bef.  1]. 

The  significance  cf  the  persistency  classification  lies 
in  the  measures  necessary  to  protect  the  soldier  against 
chemical  effects,  and  the  duration  of  the  protection 
required.  Non p er sistent  agents  normally  require  only  the 
protective  mask  as  a  protective  measure,  and  the  duration 
of  effectiveness  is  measured  in  minutes  to  a  few  hcurs. 
Persistent  agents,  on  the  other  hand,  require  complete  body 
protection  and  the  effects  may  last  from  hours  to  days.  In 


addition  to  requiring  protection  at  the  point  of  release  cf 
the  agent,  persistent  agents  will  contaminate  ar.y  material 
coming  in  contact,  so  soldiers  who  leave  an  area  after  a 
persistent  agent  attack  remain  contaminated.  Or.ce  contami¬ 
nated,  they  must  remain  in  full  protection  for  a  period  of 
up  to  several  days  unless  the  contamination  is  removed 
through  decontamination. 

Unfortunately,  the  distinction  between  persistent  and 
nonpersistent  agents  is  not  clear  cut.  The  persistency  cf  a 
given  chemical  agent  depends  upon  its  physical  properties, 
the  means  cf  dissemination  (delivery)  ,  the  environmental 
conditions  at  the  delivery  area,  and  the  type  and  condition 
cf  the  terrain,  equipment,  and  material  that  the  agent  falls 
upon  .  Seme  agents  are  classified  as  semi -persists r.t ,  indi¬ 
cating  that  they  may  be  tactically  employed  either  for  their 
inhalation  cr  percutaneous  effect  and  may  last  for  rela¬ 
tively  short  or  long  periods  of  time  depending  upon  the 
factors  given  above.  The  only  true  nonpersistent  agents  are 
those  found  in  a  gaseous  state  under  normal  battlefield 
environmental  conditions.  These  include  most  blood  and 
choking  agents.  Generally  classed  as  persistent  agents  are 
the  blister  agents,  V-seriss  nerve  agents,  and  thickened 
G-series  nerve  agents,  while  unthickened  G-series  nerve 
agents  are  often  classed  as  semi -persistent.  Again,  these 
classifications  may  change  under  different  conditions 
£  Ref  >  2]. 

Persistent  agents  create  the  most  problems  in  tactical 
situations  because  cf  the  problems  associated  with  the 
protecticn  required  and  with  contamination.  Persistent 
agents  may  be  employed  in  order  to  present  these  problems 
rather  than  to  cause  casualties  (although  casualties  are  an 
obvious  secondary  benefit)  .  They  may  be  employed  in  areas 
without  troeps  in  order  to  create  contamination. 


A.  APPROACHES  TO  HO  CEILING  PERSISTENT  CHEMICAL  AGENTS 


There  have  been  several  approaches  taken  toward  modeling 
the  effects  of  chemical  agents  on  the  battlefield.  The 
traditional  approach  has  been  to  determine  aggregate  casual¬ 
ties  (in  percentages)  to  a  unit  attacked  with  a  given  number 
of  chemical  munitions,  which  is  dependent  upon  parameters 
such  as  target  size,  type  of  agent  and  munition,  protection 
afforded  the  troops  and  environmental  conditions  at  the 
delivery  area.  This  approach  may  prove  useful  in  high-level, 
low  resolution  combat  models  where  the  basic  ccmbat  entity 
is  a  unit.  However,  it  ignores  some  significant  effects  of 
chemical  agent  employment  and  creates  problems  in  disaggre¬ 
gation  in  models  where  individual  entities  or  small  groups 
such  as  crews  are  modeled. 

The  casualty  approach  ignores  the  effects  of  contamina¬ 
tion  and  reduced  personnel  effectiveness  due  to  full 
chemical  protection.  In  was  mentioned  before  that  persis¬ 
tent  agents  may  be  employed  to  produce  this  effect  rather 
than  casualties.  The  impact  of  persistent  chemicals  upon  the 
individual  soldier  is  discussed  in  more  detail  in  the  next 
chapter.  The  important  nhi  ng  to  realize  is  that  the  effects 
created  by  the  presence  of  a  chemical  agent  are  as  important 
as  the  effects  caused  by  the  agent  penetrating  the  body, 
causing  casualties  through  its  toxic  effect.  Models  in  the 
past  few  years  have  increasingly  included  the  chemical 
protective  level  as  a  fundamental  environmental  parameter 
and  have  included  the  effects  of  protection  and 
contamination  in  various  ways. 

The  percentage  casualty  approach  toward  modeling  chem¬ 
ical  agent  effects  is  generally  unsuitable  for  low-level, 
high  resolution  models  that  track  individual  soldiers  as 
basic  ccmbat  entities.  It  is  not  difficult  to  disaggregate 
when  all  of  the  individuals  in  a  unit  are  basically 
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interchangeable,  for  example,  in  a  dismounted  infantry 
company  (even  there,  there  are  distinctions  between  the 
weapons  employed).  However,  the  scheme  becomes  harder  to 
apply  wten  individuals  are  different;  for  example, 
distinguishing  between  the  driver,  loader,  gunner,  or 
commander  of  a  tank.  Stochastic  assignment  is  possible  but 
this  tends  to  ignore  differences  in  protection  between 
individuals.  As  a  result,  an  approach  that  measures  the 
effect  a  chemical  agent  will  have  on  each  individual,  based 
on  his  own  level  of  individual  and  collective  protection,  is 
more  suitable  for  high-resolution  simulation. 

When  considering  the  question  of  how  to  model  the  dosage 
received  from  a  chemical  agent,  two  approaches  present  them¬ 
selves.  Cne  approach  involves  the  use  cf  the  simulation 
event  scheduling  capability  of  the  SItfSCKIPT  language 
£Re£.  3].  As  each  initiating  event  occurred  (for  example, 
the  impact  of  a  chemical  round),  reactive  measures  could  be 
scheduled  as  a  result  of  this  event.  There  are,  however, 
several  problems  associated  with  this  approach.  If  the 
person  encounters  a  chemical  agent  as  a  cloud  or  when 
crossing  chemically  contaminated  terrain,  there  is  no  set 
time  at  which  he  may  detect  the  presence  of  the  chemical 
agent  and  react  accordingly.  As  a  result,  the  model  would 
have  to  check  frequently  to  see  if  the  situation  favors 
scheduling  a  detection  event.  The  dosage  received  by  an 
individual  exposed  to  a  chemical  agent  depends  upon  the 
times  at  which  the  individual  took  actions  to  reduce  that 
exposure;  for  example,  masking  ana  decontaminating.  However, 
the  scheduling  of  these  events  may  depend  upon  the  dose 
accumulated  because  the  individual  may  first  detect  the 
presence  of  a  chemical  agent  when  he  shows  symptoms 
resulting  from  exposure.  Thus,  another  problem  with  this 
approach  is  the  interdependence  of  dosage  with  individual 
protective  reactions.  It  is  possible  to  handle  this  problem 


14 


by  updating  the  dosage  whenever  any  event  occurred  wnich 
would  affect  the  dosage  received,  such  as  masking,  etc. 
However,  a  periodic  update  would  still  have  to  be  scheduled 
to  check  if  the  dosage  accumulated  was  sufficient  to 
initiate  events.  This  creates  another  problem,  which  is 
calculating  the  deposition  or  airborne  concentration  of 
agent  at  the  individual's  location.  If  an  event-initiated 
approach  is  used,  it  will  be  necessary  to  be  able  to  compute 
the  dcsage  at  any  time  at  any  location.  Host  models  create 
an  entire  grid  of  deposition  when  called.  Thus,  either  this 
grid  would  have  to  be  called  repetitively  after  very  short 
time  intervals  as  each  individual  had  a  triggering  event,  or 
an  individual  time  and  space  approximating  heuristic  would 
have  to  be  applied  between  periodic  updates. 

The  ether  approach,  which  has  been  adopted  in  this 
model, is  tc  conduct  a  check  cf  every  individual  on  the 
battlefield  periodically  and  update  the  times  that  actions 
would  have  occurred  accordingly.  This  periodic  check  can  be 
scheduled  every  time  the  deposition  patterns  are  updated, 
negating  the  requirement  fer  continuous  refreshment  of  the 
deposition  patterns.  The  update  examines  the  situation  as  it 
appeared  during  the  period  since  the  last  update  and  decides 
if  any  action,  such  as  detection,  should  have  occurred  in 
that  interval.  If  sc,  it  will  schedule  all  events  initiated 
by  that  detection  sequentially  into  the  future.  The  actions 
predicted  by  the  update  can  be  continuous  in  time.  The  only 
slippage  that  occurs  is  the  length  of  the  update  interval  -- 
which  should  be  relatively  brief.  The  times  of  actions  and 
reactions  must  be  accessed  by  the  dosage  calculations,  and 
they  should  be  accessible  outside  the  module  for  use  in  the 
main  simulation.  In  order  to  accomplish  this,  the  times 
that  individual  reactive  protective  measures  are  taken  are 
assigned  tc  attributes  of  each  person.  This  attribute 
related  approach  also  allows  the  model  to  schedule  events  in 


the  future,  in  terms  of  assigning  a  future  time  value  to  an 
attribute.  These  values  can  be  accessed  at  a  later  time  and 
used  to  make  dosage  or  other  calculations. 

B.  IN  0 TEH VIEW  OF  TEE  PERSISTENT  CHE8ICAL  EFFECTS  MODEL 

1 .  Capabilities  of  the  model 

The  model  will  simulate  the  following  actions  taken 
in  response  to  a  chemical  hazard  or  which  will  occur  when  a 
persistent  chemical  agent  is  present: 

1.  Detection  of  the  chemical  agent,  from: 

a.  Chemical  agent  alarms  or  detectors. 

b.  Fresence  of  suspicious  physical  signs. 

c.  Earning  from  a  nearby  person  who  has  detected  the 
presence  of  a  hazard. 

d.  The  appearance  of  visible  symptoms. 

2.  Automatic  masking  and  increase  in  chemical  protection 
as  dictated  by  doctrine  and  training. 

3.  tasking  and  increases  in  chemical  protection  due  tc: 

a.  Orders. 

b.  Detection  of  the  chemical  hazard. 

4.  Seeking  or  creating  temporary  overhead  cover. 

5.  Immediate  individual  decontamination  of  skin  and 
clothing. 

6.  Injection  of  a  nerve  agent  antidote,  to  include 
wrongful  injection. 

7.  changes  in  collective  protection. 

8.  Decay  of  agent  due  to  weathering. 

9.  Dosage  of  chemical  agents  accumulated  infernally,  as  a 
function  of: 

a.  Individual  protection. 

b.  Collective  protection. 

c.  Leakage  (if  any)  in  protection. 

d.  Deccntamina  ticn. 

e.  Eirst  aid  administered. 


f.  Aar  and  ground  cone  ent  rat  aon . 

g.  Agent  type. 

h.  Chemical  situation;  i.e.f  moving  or  stationary;  in 
area  of  direct  effects,  indirect  effects,  or 
contamination. 

i.  Time. 

10.  All  of  the  above  can  occur  in  a  multiple  agent  environ¬ 
ment.  The  maximum  number  of  expected  agents  must  be 
established  at  the  beginning  of  the  simulation. 

The  model  can  handle  many  different  combinations  of 
personnel,  equipment,  or  doctrine  by  varying  ths  user- input 
parameters  which  establish  all  equipment  characteristics, 
probabilities  of  taking  alternative  actions,  and  distribu¬ 
tions  of  times  ci  actions  taker..  This  provides  a  large 
degree  of  flexibility  in  fitting  it  to  a  particular  main 
combat  simulation  and  a  scenario. 

The  model  provides  the  following  outputs  for  each 
individual  soldier  through  attributes: 

1.  Accumulated  dosage  for  multnple  agents,  updated  at  a 
user-defined  interval  (10  seconds  or  less)  . 

2.  Individual  protection  status  for  7  different  body 
areas. 

3.  Collective  protection  status. 

4.  Threshold  dosage  for  each  different  agent  for  impair¬ 
ment,  incapacitation,  and  death. 

5.  Chemical  detection  status  of  individual. 

6.  Contamination  /  deposition  on  exterior  of  protection. 

7.  leakage  rates  of  individual  protective  items  tc  liquid 
and  vapor  hazards. 

8.  Times  at  which  the  following  events  were  completed  or 
reached; 

a.  latest  change  in  individual  and  collective  protection, 
for  each  item  of  protection. 

b.  Contamination  of  the  individual  or  his  vehicle. 

c.  Individual  decontamination. 


d.  The  detection  of  a  chemical  hazard. 

e.  Nerve  agent  antidote  injection. 

f.  Reaching  the  impairment  or  incapacitation  threshold  for 
each  agent. 

g.  The  occurrence  cf  death. 

2.  Limitations 

The  model  is  limited  by  its  scope  and  some  of  the 
assumptions  made.  Some  salient  points  are  mentioned  here. 

The  model  dees  not  translate  the  actions  taken 
internally  to  the  main  combat  model.  An  interface  will  need 
to  be  made,  unique  to  each  implementation,  which  queries 
(through  attributes)  the  chemical  model  about  the  actions 
faker,  and  the  times  at  which  those  actions  occurred  or  were 
completed.  This  information  should  be  used  to  affect  the 
combat  performance  cf  the  individual  in  the  main  simulation. 
A  possible  delay  of  up  to  DELT  seconds  (the  user-defined 
interval  at  which  the  model  is  called)  may  occur.  Most 
actions  are  scheduled  by  the  chemical  model  to  occur  ir.  the 
future,  but  those  that  began  during  the.  DELT  lock  back 
cannct  be  accessed  until  the  end  of  the  update.  For  example, 
the  model  determines  that  detection  occurred  at  the  previous 
update  time  TL;  masking  is  scheduled  and  is  completed  at 
time  TL  +8  seconds.  This  information  is  '  not  available 
until  TL  +  DELT  seconds  (the  current  time)  -  if  DELT  is  10 
seconds,  there  is  a  10  second  lag  in  the  detection  event  and 
a  2-seccnd  lag  in  the  masking  event.  This  delay  should  not 
normally  be  significant  but  this  is  the  reason  for  the 
recommendation  that  DELT  be  10  seconds  or  less. 

The  model  will  increase  the  level  of  chemical 
protection  automatically  but  will  not  decrease  it.  The 
reason  for  this  is  the  long  delay  after  contamination 
cccurs  before  it  is  safe  to  remove  protective  clothing.  It 
is  fairly  simple  to  have  the  protection  reduced  on  order 


(see  the  chapter  on  model  enhancements)  hut  the  decision 
logic  for  That  order  is  not  present  in  the  model.  Ir.  fact, 
although  the  model  will  respond  to  directed  changes  in 
protection  the  procedure  for  making  that  decision  will  have 
to  be  modelled  separately  (it  has  not  been  included  -  this 
enhancement  is  probably  implementation-specific) . 

There  is  no  decontamination  beycni  the  immediate 
individual  decontamination  contained  in  the  model.  This  is 
suggested  as  an  extension  (see  Chapter  4). 

The  data  requirements  placed  on  the  user  form  both  a 
capability  and  a  limitation  cr.  the  model.  On  or.e  hand,  the 
model  is  very  flexible  and  can  respond  in  many  different 
ways  as  desired.  This  makes  the  model  useful  for  a  variety 
cf  combat  simulations  and  scenarios.  However,  there  is  a 
significant  time  investment  involved  in  determining  the 
appropriate  parameters  and  some  information  may  not  be 
available.  Many  models  bypass  this  by  hard  coding  various 
assumptions  cr  d istribution s.  This  permits  the  user  of  such 
a  model  tc  avoid  the  effort  of  determining  these  parameters, 
but  forces  him  to  accept  the  hidden  assumptions.  The  user 
of  the  model  presented  in  this  thesis  may  make  the  simula¬ 
tion  and  inputs  as  simple  or  as  complex  as  time  and 
resources  allow. 

3  •  Medal  Re  auirements 

The  model  described  in  this  thesis  is  a  high- 
resolutior  model  designed  to  be  called  from  a 
high-resclution  combat  simulation.  It  can  be  implemented 
with  any  model  that: 

1.  Tracks  individual  soldiers  as  combat  entities. 

2.  Is  capable  of  describing  the  protection,  both  indi¬ 
vidual  and  collective,  of  each  soldier  at  any  given 


3.  Is  capable  of  identifying  the  time  and  location  of 
every  incoming  round  or  delivered  attack  (chemical  or 
conventional)  . 

4.  Is  capable  of  providing  a  pattern  of  chemical  agent 
deposition  and  cloud  spread  at  frequent,  periodic 
times. 

Although  not  a  requirement,  the  model  is  designed  to 
be  implemented  in  SIMSCRIPT  and  uses  the  attribute  and  set 
membership  capabilities  of  that  language.  A  specific  imple¬ 
mentation  of  this  model  written  in  SIMSCRIPT  has  been 
included.  It  is  designed  to  be  used  as  a  module  within  the 
Simulation  of  Tactical  Alternative  Responses  (STAR)  model 
resident  at  the  TRADCC  Research  Element,  Monterey. 

4  .  A  General  Explanation 

The  model  presented  in  this  thesis  is  designed  tc 
predict  the  accumulated  dosage  of  chemical  agent  received  by 
any  individual  modeled  ir.  the  main  combat  simulation.  It 
models  the  actions  performed  by  an  individual  after  encoun¬ 
tering  a  persistent  chemical  agent  hazard  from  any  source. 
The  model  will  simulate  both  immediate  threats  posed  by 
direct  chemical  attacks  upon  ground  troops,  and  residual 
hazards  posed  by  downwind  travel  of  chemical  agent  clouds 
and  contamination  of  terrain. 

The  model  requires  an  explicit  input  of  the  air 
concentration  in  milligrams  /  cubic  meter,  and  the  ground 
depositicn  in  milligrams  /  square  centimeter  at  each  grid 
coordinate  at  each  update  time.  In  the  STAR  model,  this  is 
provided  by  a  modified  version  of  NtJSSE  II  [Ref.  4],  which 
provides  concen traticns  and  depositions  in  an  irregularly 
spaced  grid  pattern,  with  uniform  concentrations  assumed 
within  a  grid  square.  This  model,  or  one  like  it,  should  be 
called  to  update  the  ground  and  air  concentrations  at  each 
iteration. 


The  initial  chemical  agent  effects  begin  at  the  time 
of  impact  of  a  chemical  munition  or  the  time  of  dispersion 
of  agent.  Since  the  most  common  means  of  delivery  to 
front-line  positions  will  be  artillery,  and  since  it  is  the 
only  delivery  system  currently  modeled  in  STAR  capable  of 
delivering  chemical  agents,  artillery  is  the  assumed  means 
of  delivery  for  the  purpose  of  alerting  trcops  of  the 
possibility  of  an  attack.  Other  delivery  means,  such  as 
aerial  spray  and  chemical  mines,  can  be  modeled  in  terms  of 
their  chemical  effects,  and  the  delivery  can  be  added 
without  too  much  effort  to  the  model  framework.  Enhancements 
to  the  basic  model  are  discussed  in  Chapter  4. 

The  area  of  direct  attack  is  considered  to  be  th<=- 
area  within  which  troops  may  react  to  the  attack  wi-hout  any 
indication  of  its  chemical/nonchemical  nature.  Within  the 
model,  it  is  defined  as  the  area  within  which  an  individual 
may  be  expcsed  to  a  hazard  from  exploding,  conventional 
munitions.  He  will  therefore  take  ordinary  protective 
measures,  such  as  hitting  the  ground  or  seeking  cover. 

The  remaining  areas  of  interest  are  the  areas  of 
initial  and  secondary  liguid  deposition  outside  of  the 
direct  effects  ellipse,  the  area  of  downwind  spread  from 
initial  attack  area,  and  the  areas  of  residual  contamina¬ 
tion.  Possible  downwind  effects  from  residual  contamination 
are  assumed  negligible. 

The  model  is  designed  to  handle  simultaneously 
multiple  chemical  agent  classes.  The  deposition  for  each 
agent  and  accumulated  internal  dosages  are  computed  sepa¬ 
rately,  with  no  interaction.  It  is  possible  to  increase  the 
time  required  to  decontaminate  two  or  more  agents  simultane¬ 
ously  through  a  user-defined  parameter.  Synergistic  effects 
are  ignored,  but  reactions  will  occur  based  on  the  first 
agent  hazard  detected  or  suspected. 


The  model  is  designed  to  simulate  the  reactive  meas¬ 
ures  taker  by  two  or  more  sides.  The  logic  of  reacting  to  a 
persistent  agent  attack  tends  to  be  the  same  regardless  of 
nationality,  as  described  in  Chapter  2  (Doctrine).  The 
probabilities  of  taking  several  different  alternative 
acticns,  based  on  training,  doctrine,  and  the  situation,  are 
contained  in  user-input  global  variables  which  are 
dimensioned  by  the  number  of  sides.  Also,  descriptive 
variables,  such  as  alarm  thresholds  and  the  protection 
afforded  by  chemical  protective  garments  are  similarly 
dimensioned.  It  is  possible  to  play  two  sides  (e.g.,  RED  and 
SLUE)  or  more  than  two  (joint  exercises  involving  allied 
forces  with  different  doctrine  and/or  equipment). 


All  effects  are  co  moused  at  the  2nd  of 


defined  interval  of  time  (or.  the  order  of  10  seconds  or 
less)  .  All  individuals  on  the  battlefield  are  updated  each 
time;  events  that  occurred  within  the  interval  are  assigned 
absolute  times  of  occurrence  stored  in  attributes  of  the 
terser!.  These  attributes  can  be  accessed  external  to  the 
model  to  compute  the  effects  on  ccmbat  performance  caused  by 
the  use  cf  chemical  agents. 

When  a  giver,  round  or  volley  impacts  (or  ejects 
chemical  agent)  ,  reactive  measures  taken  by  troops  exposed 
to  the  hazards  may  begin.  The  deposition  model  will  provide 
a  model  cf  the  travel  of  agent  vapor  and  liquid  to  the 
ground  and  dewnwind. 

In  general  terms,  the  model  does  the  following:  At  a 
set  time  interval,  a  routine  (CHEM. CHECK)  is  called  and 
performed  for  all  individuals  alive  on  the  battlefield.  The 
routine  checks  to  see  if  the  individual  has  been  exposed  to 
any  chemical  agent  hazard  since  the  last  update.  This  hazard 
could  be  from  a  chemical  attack,  movement  of  a  chemical 
cloud  ever  the  individual’s  position,  encountering  a  cloud 
or  contaminated  terrain  while  moving,  or  from  previous 
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contamination.  If  ha  has  beer,  exposed  to  a  chemical  hazard 
dosage  will  be  a ssessea  according  to  his  exposur®  an 
protection  level  during  the  interval  since  the  las*  update. 
In  addition,  the  model  checks  to  see  if  the  individual  will 
react  to  the  chemical  agent  threat.  This  reaction  could  be 
ini*iated  by  a  conventional  attack  (due  to  doctrine),  the 
suspected  detection  of  a  chemical  agent  based  on  physical 
signs,  detector  paper  or  kits,  alarms,  nearby  soldiers 
detecting  the  agent,  or  the  appearance  of  symptoms.  The 
precise  actions  taken  will  be  dependent  upon  the  initiating 
event,  the  current  level  of  protection  (collective  and  indi¬ 
vidual)  ,  and  the  doctrine  involved,  which  is  established  by 
setting  probabilities  upon  alternative  courses  of  action.  In 
addition,  seme  actions  say  automatically  trigger  ethers.  For 
example,  performing  decontamination  automatically  causes  the 
donning  cf  chemical  protective  gear  after  the  completion  of 
decontamination . 

There  will  be  several  probability  distributions 
determining  the  time  at  which  a  unit  (person)  notices  the 
attack.  At  this  pcint,  the  given  individual  will  take 
protective  action  in  accordance  with  his  degree  of  protec¬ 
tion.  Once  he  has  assumed  a  protective  posture,  he  can  warn 
ethers  nearby  of  the  attack.  The  detection  event  can  be 
triggered  by  chemical  agent  alarms  -  when  an  alarm  is  trig¬ 
gered,  it  will  automatically  cause  all  persons  within  a  sat 
distance  tc  notice  the  attack.  The  actual  time  that  a  given 
individual  notices  the  attack  is  the  earliest  of  three  times 
-  the  time  he  would  have  noticed  it  by  himself,  the  time  a 
nearby  person  detected  the  attack,  or  the  time  a  nearby 
alarm  was  sounded.  The  latter  two  times  are  adjusted  for 
distance . 

The  major  effect  of  the  hazard  presented  by  the 
vapor  prcduced  by  a  chemical  agent  attack  will  be  tc  change 
the  individual  and  collective  protection  categories  of 


adjacent  units,  resulting  in  degradation  caused  by  the 
protective  gear  (not  modeled).  If  the  vapor  cloud  reported 
by  NUSSE  II  (or  some  equivalent  deposition  model)  travels  to 
a  unit  area  before  that  unit  has  increased  its  cictective 
level  tc  at  least  the  minimum  required  to  prevent  the 
chemical  agent  from  entering  the  body,  then  the  model  will 
handle  dosage  and  other  computations  as  if  the  unit  had  been 
attacked  with  the  appropriate  concentration  of  agent. 

Normally,  units  crossing  an  area  of  chemical  contam¬ 
ination  will  assume  full  individual  protection  prior  tc 
crossing  (or  seal  themselves  within  vehicles  with  positive- 
pressure  filtration  systems).  If  the  unit  assumes  such 
protection,  the  only  dosage  received  by  individuals  will  be 
that  resulting  from  leaks  in  the  chemical  protection  caused 
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hazards,  tears,  improper  decor.taminatic: 


donning,  etc.  The  vehicles  and  all  persons  not  inside  sealed 
vehicles  will  be  regarded  as  contaminated  for  the  remainder 
of  the  sinulation. 

The  amount  of  agent  picked  up  onto  vehicles,  equip¬ 
ment,  and  personnel  can  be  set  through  a  user-defined 
parameter  to  be  a  percentage  of  the  deposition  or.  the 
ground.  This  pickup  factor  is  used  whenever  the  unit  is 
passing  through  an  area  of  old  deposition;  if  the  agent  is 
still  falling  towards  the  ground,  the  unit  is  assumed  to 
receive  the  current  deposition. 

If  the  unit  does  not  assume  chemical  protection 
prior  to  entering  the  contaminated  area,  then  individuals 
will  begin  to  receive  dosage  as  soon  as  they  cross  the 
threshold  of  the  contaminated  area  (some  arbitrary  level 
will  have  tc  be  set  as  the  outer  limit  of  effective  contami¬ 
nation)  .  it  some  point  they  may  notice  the  contamination 
(the  detection  process  being  similar  in  concept  to  noticing 
a  direct  attack)  and  take  the  same  protective  and  decontami¬ 
nation  measures  as  if  they  had  teen  directly  attacked.  Delay 


times  and  dosage  received  will  be  handled  using  the  same 
routines  used  for  the  direct  attack.  Some  assumptions  have 
been  made  regarding  the  amount  of  contamination  or.  soldiers 
if  essentially  all  of  th  ~  agent  has  settled  on  the  ground  at 
the  time  of  entering  the  area  (see  Chapter  3,  Section  B)  . 

When  actions  are  predicted  based  on  an  event  such  as 
a  detection  that  occurred  during  the  interval  since  the  last 
chemical  update,  times  that  each  action  would  be  completed 
are  stored  in  attributes  of  the  person  involved.  These  times 
are  later  referred  to  m  the  present  or  future  iterations  of 
the  routine  to  figure  the  protection  available  to  the  indi¬ 
vidual  for  dosage  calculations,  and  also  to  predict  the 
likelihood  of  follow-cn  events. 

The  model  dees  not  attempt  to  translate  the  actions 
taken  by  the  individual  soldier,  or  the  dosage  received  by 
him,  into  actions  that  will  affect  the  main  combat  simula¬ 
tion.  These  translations  would  be  model  specific.  For 
example,  a  soldier  cannot  fire,  acquire  targets,  etc.  during 
the  time  that  he  is  masking.  A  check  needs  to  be  made  in  the 
routines  that  simulate  these  actions  in  the  main  simulation 
to  see  when  the  individual  does  these  things  in  order  for 
them  tc  affect  the  combat  processes.  The  model  does, 
however,  provide  the  necessary  information  for  such  transla¬ 
tion  through  the  values  assigned  to  attributes.  These  times 
can  be  accessed  by  other  routines  in  the  main  simulation  to 
affect  other  combat  processes,  such  as  target  acquisition, 
movement,  etc.  Also,  the  level  of  protection  can  be  changed 
external  tc  the  model  as  reaction  to  command  decisions, 
actions  affecting  other  elements  of  the  same  unit,  changes 
in  mission,  etc.  This  change  in  chemical  protection  is 
caused  by  accessing  an  attribute  that  stores  the  level  of 
protection  to  which  the  individual  must  go;  then  these 
changes  are  later  assigned  completion  times  in  the  same 
manner  as  if  they  were  in  reaction  to  a  real  or  perceived 
threat. 


5.  Cutlin s  of  Thesis  D cementation 

This  thesis  provides  documentation  of  the  tasic 
model  and  also  its  implementation  in  STAR.  The  next  chapter. 
Chapter  2,  describes  the  current  doctrine  for  reacting  to 
persistent  chemical  agent  attacks,  and  some  of  the  pertinent 
problems  that  the  model  must  address.  Chapter  3  outlines  the 
model  itself,  and  provides  the  logic  in  a  series  of  flow¬ 
charts.  It  is  recommended  that  a  new  reader  interested  in 
the  model  capabilities  for  possible  implementation  read  only 
the  outlines  at  the  beginning  of  each  routine  description, 
and  then  skip  to  Appendix  B,  where  input  requirements  and 
instructions  are  stated.  Chapter  3  can  later  be  read  in  more 
detail  after  the  requirements  have  been  examined. 

Chapter  4  discusses  possible  model  enhancements  and 
extensions,  and  gives  recommendations  for  further  modeling 
efforts. 

The  appendices  provide  the  detailed  information  on 
model  inputs  and  outputs,  to  include  user-defined  parameters 
and  general  definitions.  The  SIMSCRIPT  routines  for  the  STAR 
module  are  documented,  and  problems  unique  to  the 
implementation  of  this  model  in  STAR  are  discussed. 


II.  DOCTRINE  FOR  REACTING  TO  PERSISTENT  CHEMICAL  AGENT 

ATTACKS 


The  doctrine  for  reacting  to  a  persistent  chemical  agent 
attack  is  largely  driven  by  logic.  The  immediate  reacticn  of 
a  soldier,  regardless  of  his  training  or  nationality,  will 
ha  tc  cover  all  areas  of  the  body  that  are  susceptible  to 
the  tcxic  effects  of  the  chemical  agent.  With  persistent 
chemical  agents,  this  means  covering  all  areas  of  the  body 
with  a  chemically-  impermeable  garment  as  well  as  protecting 
the  respiratory  tract  from  airborne  hazards. 

If  it  were  always  possible  to  detect  the  presence  of  a 
chemical  agent  before  there  was  any  significant  exposure  to 
it,  chemicals  wculd  not  pose  a  significant  threat  in  terms 
of  incapacitation  and  lethality.  However,  it  is  often  diffi¬ 
cult  to  detect  the  presence  of  a  chemical  agent  from 
physical  signs  or  other  signatures  noticeable  to  the  unaided 
senses.  If  one  waits  to  react  until  symptoms  appear,  a  dose 
sufficient  tc  cause  impairment  has  been  reached,  and  this 
impairment  may  delay  reaction.  It  is  also  possible  that  a 
severely  incapacitating  or  lethal  dose  of  agent  can  be 
absorbed  prior  to  the  appearance  of  gross  symptoms. 

A  soldier,  therefore,  is  presented  with  a  dilemma.  On 
one  hand,  he  dees  net  wish  to  react  prematurely,  as  the 
chemical  protective  garments  will  hamper  his  ability  to 
perform  combat  tasks.  On  the  other  hand,  he  wants  tc  assume 
this  protection  prior  to  exposure  to  chemical  agents.  The 
tactical  doctrine  of  various  nations  has  evolved  to  try  to 
cope  with  this  dilemma. 

One  obvious  way  for  a  commander  to  be  able  to  minimize 
losses  due  to  persistent  chemical  agent  attacks  is  to  place 
all  soldiers  in  a  protective  posture  prior  to  any  possible 
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attack.  However,  there  are  many  potential  drawbacks  to  doing 
this.  A  major  problem  in  moderate  to  ho~  temperatures  is 
heat  stress.  Due  to  the  semi-permeable  or  impermeable  nature 
of  chemically  protective  garments,  it  is  possible  to 
generate  a  significant  heat  load  while  wearing  them,  partic¬ 
ularly  with  strenuous  tasks,  high  temperatures,  and 
humidity.  It  is  possible  for  heat  stress  to  cause  more  casu¬ 
alties  cn  a  battlefield  than  any  other  cause.  Additionally, 
there  is  some  sensory  impairment  associated  with  chemical 
protective  gear,  particularly  the  mask.  Vision  and  hearing 
are  impeded;  eating  and  possibly  drinking  cannot  be  accom¬ 
plished  while  wearing  the  mask.  Personal  hygiene  normally 
requires  removal  of  some  if  not  ail  of  the  protective 
garments.  As  a  result,  there  is  a  tactical  tradeoff  between 
the  amount  or  protection  worn  during  periods  when  there  is 
no  immediate  threat,  and  the  mission  to  be  performed.  In  the 
United  States,  the  doctrine  associated  with  this  is  called 
the  Mission-Oriented  Protective  Posture  (MOPP)  ,  which 
directs  the  commander  to  establish  a  level  of  protection  for 
his  troops  based  on  his  perception  of  the  threat,  the  envi¬ 
ronment,  and  the  tasks  to  be  performed  by  these  troops. 
Military  forces  cf  ether  nations  use  their  own  terminology 
but  all  recognize  the  existence  of  this  tradeoff  and  allow 
the  commander  to  specify  the  level  of  protection  for  his 
troops  within  doctrinal  guidelines  [Bef.  5], 

Cnee  a  protective  level  has  been  established,  there  are 
certain  tactical  situations  that  direct  a  soldier  to 
increase  his  level  of  protection  without  orders.  One  obvious 
situation  is  detecting  the  presence  of  a  chemical  agent. 
This  detection  may  be  reasonably  certain  or  merely 
suspected,  based  upon  the  detection  of  suspicious  signs  (to 
include  the  presence  of  smoke)  ,  instruments  capable  of 
detection  such  as  alarms  and  detector  kits,  and  the  appear¬ 
ance  cf  symotoms.  However,  detection  may  occur  too  late  to 


prevent  exposure.  As  a  result,  certain  other  tactical  si*u- 
atior.s  may  be  specified  by  doctrine  to  trigger  react iv  = 
measures.  Because  the  two  predominant  chemical  agent 
delivery  systems  are  artillery  and  aircraft,  soldiers  may  be 
directed  to  increase  protection  whenever  they  receive 
incoming  artillery  ox  a  spray  or  bomblet  attack  by  aircraft 
[Ref.  6].  The  probability  of  this  reaction,  as  well  as  the 
extent  of  the  reaction,  can  be  established  explicitly  in  the 
model. 

After  the  individual  has  assumed  an  appropriate  level  of 
protection,  if  he  has  reason  to  suspect  that  the  attack 
involved  a  persistent  chemical  agent  and  that  the  agent  is 
still  falling  toward  the  ground  (for  example,  a  spray  attack 
or  an  indirect  fire  attack  where  the  agent  remains 
suspended  in  the  air  fcr  a  noticeable  period  of  rise)  ,  the 
soldier  must  seek  some  type  of  overhead  cover  if  he  is  not 
already  under  some.  Overhead  cover  can  be  reached  by 
entering  a  vehicle  or  a  bunker  ,  building,  or  other  fortifi¬ 
cation.  If  such  cover  is  not  nearby,  cover  can  be  improvised 
by  covering  the  body  with  a  poncho,  shelter- half ,  chemical 
protective  cape,  or  ether  such  material.  After  overhead 
cover  has  been  reached  or  created,  decontamination  can 
commence  if  necessary.  All  doctrine  normally  calls  for  the 
immediate  decontamination  of  exposed  skin.  In  addition,  if 
there  is  an  area  of  the  body  that  will  soon  be  covered  with 
a  chemical  protective  garment,  it  should  be  decontaminated 
also  to  prevent  trapping  agent  under  the  protective  garment. 
This  action  may  be  delayed  by  the  tactical  situation,  but 
normally  skin  decontamination  is  accomplished  immediately 
and  decontamination  of  clothing  and  gear  that  will  be 
covered  by  a  protective  garment  is  accomplished  shortly 
thereafter  [Ref.  7], 
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It  is  apparent  that  there  is  a  decision  tc  be  made  by 
the  soldier.  If  he  suspects  that  he  has  been  contaminated, 
and  he  was  not  in  full  chemical  protection,  he  must  deconta¬ 
minate  prior  to  assuming  any  protection  other  than  the 
protective  mask.  On  the  ether  hand,  if  he  is  reacting  tc  a 
situation  such  as  indirect  fire  where  immediate  contamina¬ 
tion  is  not  suspected,  he  will  increase  his  protection 
without  decontamination.  The  precise  weighting  doctrine 
places  upon  these  alternatives  will  vary  from  country  to 
country,  and  the  probabilities  should  be  ad-justed 
accordingly. 

Reducing  the  level  of  chemical  protection,  once  assumed, 
is  a  rather  long  and  drawn-out  process.  The  absence  of  a 
chemical  agent  threat,  due  to  decontamination  or  in  cases 
where  it  was  suspected  but  not  present,  must  be  verified  by 
detection  apparatus.  This  is  a  time  consuming  process,  and 
will  not  be  accomplished  under  normal  circumstances  while 
conducting  a  combat  mission.  Because  most  high  resolution 
models  such  as  the  STAR  model  play  scenarios  of  relatively 
short  duration,  reduction  of  protective  posture  has  not  been 
modelled. 

Once  an  individual  is  in  full  protective  posture,  it  is 
still  possible  to  receive  a  chemical  agent  dose.  One  possi¬ 
bility  is  the  presence  of  chemical  agent  trapped  under  the 
protective  garment  due  to  inadequate  decontamination  or 
assuming  protection  without  decontamination.  Another  possi¬ 
bility  is  the  presence  of  leaks,  caused  by  poor  fitting  or 
improperly  denned  garments  and  masks,  or  by  tears  caused  by 
wear,  accidents,  and  combat  hazards.  This  leakage  is  not 
necessarily  detectable  by  the  individual.  It  is  also 
possible  for  chemical  agents  to  penetrate  the  protective 
clothing  after  a  long  period  of  time. 


One  cf  the  actions  taken  by  a  soldier  after  contamina¬ 
tion  will  be  to  perform  partial  decontamination  cf  his 
equipment,  vehicles,  weapons,  etc.  This  is  normally  done 
upon  command  by  all  members  cf  a  unit,  rather  than  as  an 
individual  (although  some  national  doctrine  may  call  for  a 
certain  amount  to  be  done  automatically)  .  At  seme  later 
date,  after  the  unit  has  performed  its  combat  mission  or  as 
time  allows,  the  unit  may  move  from  areas  cf  contamination 
and  go  through  complete  decontamination  of  all  personnel  and 
material.  If  the  unit  had  become  contaminated,  this  is 
normally  the  only  way  that  soldiers  may  reduce  their  indi¬ 
vidual  chemical  protection.  (Under  certain  conditions,  it 
is  possible  that  partial  decontamination,  combined  with 
weathering,  nay  permit  removal  of  protective  gear.  However, 
this  will  take  a  relatively  long  period  of  time).  Partial 
and  complete  decontamination  have  not  been  addressed  by  this 
model  because  of  the  directed  nature  of  these  actions. 


III.  THE  PERSISTENT  CHEMICAL  AG  ENT  EFFECTS  MODEL 

A.  INTRODUCTION 

The  persistent  chemical  agent  effects  model  described  in 
this  thesis  is  designed  to  predict  the  accumulated  dosage  of 
chemical  agent  received  by  any  individual  modeled  in  a 
high-resclution  simulation  such  as  STAR.  In  doing  so,  it 
also  models  the  actions  performed  by  an  individual  after 
encountering  a  chemical  agent  hazard,  whether  it  is  from  a 
direct  attack,  by  a  chemical  round  or  volley,  or  from 
encountering  a  cloud  cf  agent  or  contaminated  terrain. 

The  model  can  be  called  whan  the  first  appearance  of  a 
chemical  agent  appears  in  the  main  combat  simulation.  At 
that  time,  individuals  are  created  as  temporary  entities 
with  a  considerable  number  of  attributes,  many  of  which  are 
used  to  record  the  times  and  types  of  actions  taken  to  react 
to  persistent  chemical  agent  threats.  The  medal  updates  the 
dosage  received  by  each  individual  at  a  user-supplied 
interval  cf  time,  DELT,  simulates  the  actions  that  wculd  be 
taken  by  an  individual  facing  a  persistent  chemical  hazard, 
and  provides  an  indication  of  when  each  individual  is 
affected  by  the  chemical  agent,  which  can  be  used  to 
influence  other  modules  within  the  main  combat  simulation. 

Immediately  before  the  main  model  invokes  the  persistent 
chemical  agent  effects  model  to  update  the  chemical  status 
and  reactions  of  all  personnel,  the  routine  ALARM. UPDATE 
should  be  called  to  update  the  warning  status  of  the  auto¬ 
matic  chemical  agent  alarms  found  on  the  battlefield.  It  is 
assumed  that  the  alarms  are  capable  of  warning  personnel 
during  the  update  interval  DELT  if  the  agent  concentration 
passes  the  threshold  established  for  each  alarm  at  any  time 
during  the  interval. 


The  main  combat  simulation  modal  calls  the  routine 
CHEM. CHECK  iteratively  for  each  person  alive  or  the  battle¬ 
field  at  time  intervals  DELT  apart.  This  routine  will 
perform  all  the  functions  described  in  this  documentation 
either  within  the  routine  itself  or  by  calling  ether 
routines.  The  description  of  the  actions  performed  by  each 
routine,  along  with  the  logic  described  and  illustrated  in 
flowcharts,  is  provided  in  Section  E  of  this  chapter. 

B.  MODELING  APPROACHES 

1  •  Determination  of  the  Deposition  of  a  Chemical  Agent 

on  the  Person 

Once  the  basic  concept  of  the  model  had  been  decided 
upon,  with  its  capabilities  and  limitations,  it  was  neces¬ 
sary  to  determine  hew  to  model  the  various  phenomena  to  be 
represented.  The  input  available  from  the  main  combat  simu¬ 
lation  helped  determine  the  environmental  and  physical 
characteristics.  The  NUSSEII  model,  or  its  equivalent, 
supplies  air  concentrations  and  ground  depositions  in  a  grid 
(constant  deposition  patterns  within  the  grid)  at  the  time 
intervals  desired.  Any  individual  exposed  to  the  falling 
agent  is  likely  to  vary  the  aspect  angle  presented  to  the 
agent  as  he  conducts  his  activities,  even  over  a  brief 
period  of  time.  As  a  result,  the  simplification  of  using  the 
ground  deposition  value  of  the  grid  in  which  he  is  located 
(which  is  in  itself  an  average)  for  the  deposition  upon  the 
exterior  cf  all  body  surfaces  (or  the  exterior  surfaces  of 
the  collective  protection)  was  adopted.  The  deposition  upon 
the  individual  or  collective  protection  of  any  person  in  the 
initial  effects  area  of  a  bursting  round  has  therefore  been 
established . 
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2.  Leakage  Through  Che mical  Prot action 

Unless  the  collective  protection  is  designed  to 
provide  total  chemical  protection,  there  will  be  a  certain 
amount  of  leakage  of  both  vapor  and  liquid  (in  small  droplet 
form)  through  the  collective  protection.  It  was  assumed  than 
this  leakage  could  be  expressed  as  a  percentage  of  the 
concentration  or  deposition  on  the  exterior  of  the  collec¬ 
tive  protection.  For  vehicles,  this  percentage  is  a  function 
of  the  vehicle  system  and  weapon  type  (which  identifies  the 
specific  type)  ,  the  state  (open,  closed  without  an  overpres¬ 
sure  system,  closed  with  an  overpressure  system) ,  the  craw 
or  passenger  compartment  (where  applicable)  ,  the  agent 
type,  and  whether  we  are  examining  a  vapcr  or  liquid  threat. 
For  fixed  types  of  collective  protection  (bunker,  foxhole, 
or  in  the  open  with  temporary  overhead  cover),  a  different 
array  dependent  simply  upon  the  protection  type,  agent  type 
and  liquid/vapor  threat  is  used  to  compute  the  percentage  of 
agent  that  penetrates  the  protection.  For  these  computa¬ 
tions,  a  building  or  a  foxhole  with  overhead  cover  is 
considered  to  be  the  equivalent  cf  a  bunker. 

3.  Pickup  and  Transfer 

An  adjustment  is  made  to  model  the  amount  of  contam¬ 
ination  resulting  from  crossing  an  area  of  contamination 
that  has  completely  deposited  itself.  A  pickup  factor  is 
used  to  compute  the  percentage  of  the  ground  deposition  that 
deposits  itself  upon  individuals  or  vehicles  crossing  the 
contaminated  area.  This  pickup  factor  is  a  constant 
percentage  fcr  each  agent  and  for  all  entities.  When  vehi¬ 
cles  cross,  it  is  assumed  that  they  kick  up  enough  dust, 
etc.  to  deposit  the  adjusted  contamination  uniformly  over 
the  vehicle  surfaces.  With  individuals  crossing  cn  foot, 
this  will  not  necessarily  be  true.  The  following  approach 


was  used  to  model  personnel  crossing  an  area  cf  prior 
contamination  on  foot:  If  the  soldier  stops  at  any  point, 
or  reduces  his  silhouette  by  crouching,  kneeling,  lying 
prone,  etc.,  it  is  assuai  ed  that  he  will  come  in  contact 
with  the  ground  sufficiently  to  deposit  the  adjusted  agent 
level  over  all  body  surfaces.  If,  however,  he  continues 
moving  essentially  upright,  he  will  contaminate  only  his 
legs,  feet,  and  hands  (the  latter  area  compensates  for  the 
handling  cf  equipment,  vegetation,  etc  that  may  be  contami¬ 
nated)  .  Once  he  stops  movement,  he  will  receive  the 
contamination  over  all  surfaces. 

4  •  Ajer.t  Decay  Due  to  Weathering 

Finally,  contamination  may  be  reduced  by  a  decay 
factor  which  will  account  for  weathering.  This  decay  factor 
represents  the  percentage  of  the  original  deposition 
remaining  after  the  iteration  interval  DELT.  This  factor 
will  be  normally  very  close  to  one,  as  DELT  is  a  relatively 
short  interval  (on  the  order  cf  10  seconds  or  less)  ,  but 
this  could  prove  significant  over  several  minutes  with 
semi-persistent  agents  if  the  arithmetic  dene  on  the 
computer  will  allow  the  fraction  to  be  calculated.  The 
contamination,  once  assumed  over  the  exterior  surface,  will 
not  be  reduced  by  more  than  this  decay  factor  without  decon¬ 
taminating,  even  if  the  individual  moves  to  an  area  where 
the  ground  deposition  is  lighter  (this  holds  true  even  for  a 
clean  area  with  no  deposition). 

Explicit  representation  of  vegetation,  terrain  or 
weather  effects  is  not  included  in  the  model.  These  may  be 
represented  to  seme  extent  implicitly  in  the  calculation  of 
ground  and  air  concentrations  if  the  model  used  permits 


5  •  Individual  Chemical  Projection 

Individual  chemical  protection  is  modelled  by 
dividing  the  body  ir.  +  c  7  areas.  They  are: 

Area  1  -  Top  of  head,  normally  covered  by  helmet. 

Area  2  -  Face  and  reck,  normally  covered  by  a  protective 
mask  or  a  mask  with  hood. 

Area  3  -  Torso. 

Area  4  -  Arms. 

Area  5  -  legs. 

Area  6  -  Hands. 

Area  7  -  Feet. 

Each  of  these  areas  can  be  covered  by  an  i-em  of 
clothing  cr  gear  that  offers  a  certain  protection  factor.  A 
crot ecticn  factor,  when  multiplied  by  the  amour.*'  of  liquid 
agent  on  the  outside  of  the  clothing,  yields  the  concentra¬ 
tion  of  agent  that  penetrates  the  item.  Exposed  skin, 
therefore,  has  a  protection  factor  of  one,  while  a  perfectly 
impermeable  protective  garment  will  have  a  protection  factor 
of  zero.  Standard  Mission-Oriented  Protective  Posture  (MOP?) 
levels  cr  their  equivalent  can  be  formed  for  any  force  by 
establishing  the  seven  levels  of  the  protection  factors 
provided  by  that  MOPP.  The  average  amount  of  skin  included 
in  each  area  can  be  set  at  different  levels  for  each  side  to 
allow  for  variations  in  the  amount  of  coverage  for  different 
types  of  protective  gear.  The  body  areas  are  numbered  in  the 
order  that  they  would  normally  be  donned.  Because  the 
protection  factor  is  defined  in  terms  of  the  relative 
absorption  of  liquid  chemical  agents,  a  separate  category  of 
protection  against  vapors  and  aerosols  is  defined  for  the 
protective  mask.  Thus,  the  mask  has  two  numbers  associated 
with  it  -  the  protection  it  affords  the  skin  against  liquid 
agents,  and  the  protection  it  affords  the  respiratory  tract 
and  mucous  membranes  against  vapors  and  aerosols. 


6  *  Collective  Chemical  Protection 

Collective  chemical  protection  (CP  category)  is 
divided  into  5  categories: 

1.  Vehicles  -  closed,  equipped  with  overpressure  systems 

2.  Vehicles  -  open  or  closed,  with  no  overpressure  system 

3.  Covered  fortifications  (bunkers)  or  buildings 

4.  Foxholes 

5.  In  the  open 

The  protection  afforded  by  each  category  is  calcu¬ 
lated  by  adjusting  the  effective  ground  and  air 
concentrations  as  discussed  above.  No  time  is  assessed  when 
changing  collective  protection  categories  -  if  movement  is 
required  to  go  from  one  to  another,  then  it  should  be 
modelled  by  the  main  combat  simulation  in  the  same  manner 
that  all  movement  is  modelled. 

7 .  Detection  of  a  Persistent  Chemical  Agent 

A  major  factor  in  modelling  the  reactions  taken  to 
the  presence  of  a  chemical  agent  hazard  is  the  time  at  which 
this  hazard  is  determined.  The  word  detection  used 
throughout  this  thesis  refers  to  the  positive  suspicion  on 
the  part  of  the  individual  that  he  is  being  exposed  to  a 
persistent  chemical  agent  hazard.  Once  -this  suspicion  is 
sufficiently  strong  for  the  individual  to  assume  the  pres¬ 
ence  cf  the  agent  and  react  accordingly,  detection  has 
occurred.  This  suspicion  may  be  derived  from  doctrine  and 
training  (fer  example,  treating  all  incoming  artillery  as  a 
chemical  attack)  even  in  the  absence  of  an  actual  threat. 
Since  verification  cf  the  presence  of  a  chemice!  agent 
requires  time  and  specialized  equipment,  no  distinction  is 
made  between  the  individual  who  merely  suspects  he  has  been 
attacked  and  those  who  react  to  more  positive  evidence,  such 
as  the  appearance  of  symptoms,  or  the  sounding  cf  an  alarm. 


Detection  of  a  persistant  chemical  agent  attack  may 
cccur  in  any  of  four  ways: 

1.  The  individual  can  detect  based  on  the  assumption  that  a 
nearby  artillery  burst  was  a  chemical  munition. 

2.  The  individual  may  note  suspicious  signs  of  a  chemical 
attack,  based  on  physical  evidence  perceived  by  him. 

3.  The  individual  may  hear  a  nearby  chemical  agent  alarm  {an 
automatic  alarm  or  detector,  or  a  manually  activated  unit 
alarm)  ,  or  detect  the  reactions  of  persons  nearby  who 
have  detected  the  presence  of  the  agent. 

4.  The  individual  detects  the  symptoms  of  chemical  agent 
poisoning  in  himself. 

The  first  means  of  detection  is  modeled  using  a 
two-stags  probability,  which  may  be  set  differently  for  each 
side.  Each  individual  has  a  given  probability  of  assuming  a 
non-persistent  threat  (or  reacting  only  partially  to  a 
persistent  agent  threat)  by  masking  only.  If  a  given  person 
chooses  to  mask  (or  is  masked  but  would  have  sc  chosen)  , 
then  he  may  also  choose  whether  or  not  to  treat  the  attack 
as  persistent  by  denning  full  chemical  protection.  The 
person  is  considered  to  have  detected  the  presence  cf  a 
persistent  chemical  threat  if  he  chooses  the  latter  option; 
simply  masking  will  not  cause  the  person  to  detect.  If  the 
user  cf  the  model  wishes  to  have  soldiers  either  assume  no 
chemical  threat  or  assume  a  persistent  threat,  he  may  simply 
set  the  second  probability  at  one.  One  exception  tc  the 
procedure  given  occurs  if  the  individual  is  in  a  pressurized 
vehicle;  if  he  masks,  this  is  equivalent  to  closing  the 
vehicle  and  no  further  action  is  required. 

The  second  means  of  detection  based  cn  suspicious 
physical  signs  uses  a  glimpse  target  detection  model 
[Bef.  8].  The  chance  of  detecting  the  presence  of  a 
chemical  agent  occurs  in  discrete  glimpses  due  to  the 
discrete  nature  of  the  periodic  update.  The  probability  of 


detecting  the  presence  cf  a  chemical  hazard  during  the  ith 
iteration  cf  the  model,  g  .  ,  is  drawn  from  a  user-defir.sd 
distribution.  Since  this  value  must  be  a  probability  ranging 
from  zero  to  one,  the  Seta  distribution  is  recommended  as 
the  most  general,  although  the  user  can  substitute  another 
distribution  or  assume  a  deterministic  value.  As  a  result, 
the  probability  of  detecting  the  chemical  agent  by  the  nth 
iteration  after  the  agent  first  appeared  in  a  significant 
concentration  is: 

n 

Er  (detection)  =  1  -  J  _l  ^  (  1  -  g  )  (eqn  3.1) 

The  third  means  of  detection  relies  on  the  physical 
proximity  between  individuals  (or  automatic  alarms,  which 
are  discretely  modeled)  .  If  a  person  or  alarm  detects  the 
presence  cf  an  agent  in  a  given  iteration,  ha  (or  it)  will 
warn  all  persons  within  a  sex  radius  during  the  next  itera¬ 
tion,  with  the  time  of  such  detection  being  dependent  upon 
the  distance  from  the  person  detecting  to  the  nearest 
entity  warning  him.  The  one-iteration  delay  makes  the  prob¬ 
ability  cf  detection  via  this  means  independent  cf  the 
sequence  in  which  the  soldiers  being  modelled  are  updated. 

The  last  means  of  detection  relies  on  an  impairment 
dose  threshold,  which  is  established  for  each  person  -  agent 
pair  (the  means  of  setting  the  threshold  is  discussed  later 
in  this  section).  The  impairment  state  is  considered  equiva¬ 
lent  to  the  appearance  of  visible  sympxoms,  thus,  when  the 
person  passes  his  impairment  dose  threshold,  symptoms  will 
appear.  If  he  has  net  previously  detected  a  chemical  agent 
threat,  he  will  detect  at  the  time  that  symptoms  appear. 

8 .  Immedia  te  Reaction  Based  on  Detection 

Regardless  cf  the  means  of  detection,  the  first 
action  taken  by  the  individual  will  be  to  mask,  if  he  has 
not  already.  The  time  it  takes  the  soldier  to  perform  this 
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and  all  ether  physical  actions  is  drawn  from  a  distribution 
supplied  by  the  user  for  each  side,  based  on  the  character¬ 
istics  of  the  item  being  donned.  The  protection  afforded  by 
any  ciece  of  protective  equipment  begins  at  the  moment  the 
donning  process  is  complete;  this  time  is  stored  by  the 
model  as  the  time  at  which  a  given  item  was  domed.  Because 
of  the  definition  of  the  protection  factor  as  given  above, 
donning  the  mask  also  means  donning  the  maximum  chemical 
protection  for  body  area  two. 

In  addition,  whenever  an  item  of  protective  gear  is 
donned,  there  is  a  probability  that  the  equipment  will  leak. 
This  probability  is  assessed,  and  if  the  item  is  to  leak, 
the  amount  of  leakage  expressed  as  a  percentage  of  the 
outside  concentration  cr  deposition  is  drawn  from  a  user- 
defined  distribution.  This  procedure  is  used  to  account  for 
leakage  resulting  from  tears,  combat  damage,  improper  fit  or 
donninc,  agent  trapped  under  the  item,  etc. 

A  common  item  of  doctrine  is  to  reach  or  create 
overhead  cover  when  exposed  to  the  direct  effects  of  a 
persistent  chemical  agent.  This  is  modeled  by  setting  a 
probability  that  any  soldier  caught  in  the  open  or  in  a 
foxhole  without  overhead  cover  will  assume  that  there  is 
agent  present  in  the  air  falling  upon  him.  This  probability 
may  be  set  differently  for  each  side.  If  he  makes  that 
assumption,  a  second  probability  vector  is  used  to  determine 
which  of  three  possible  actions  is  taken  to  reach  overhead 
cover.  He  may  seek  overhead  cover  by  entering  a  vehicle,  by 
entering  a  bunker,  cr  by  creating  temporary  overhead  cover 
in  place  by  drawing  a  poncho,  chemical  protective  cape, 
shelter  half,  etc.  ever  himself.  A  time  taken  to  perform 
this  is  drawn  from  a  distribution  depending  upon  the  action 
taken,  and  the  collective  protection  category  and  time  at 
which  overhead  cover  was  reached  is  updated  appropriately. 
One  limitation  to  this  approach  is  that  it  does  not  identify 


particular  vehicles  or  bunkers  into  which  the  soldier  may 
proceed,  sc  it  may  be  difficult  to  integrate  this  reaction 
into  the  mam  model.  The  way  to  handle  such  a  problem  is  to 
only  allcw  the  use  of  temporary  overhead  ccver. 

9 .  Individual  Decontam  inatior. 

Immediate  individual  decontamination  may  be 
performed  at  two  times:  Immediately  after  detecting  the 
attack,  as  part  of  the  reaction  to  that  detection,  or  after 
symptoms  have  appeared.  There  is  a  separate  user-defined 
probability  that  ths  soldier  will  decontaminate  when  in 
either  of  those  two  situations. 

When  performing  immediate  decontamination,  all  areas 
of  exposed  skin  are  decontaminated  first,  then  ail  areas 
where  the  protection  afforded  by  clothing,  etc,  is  less  than 
that  afforded  by  the  maximum  level  available  (the  chemical 
protective  ensemble)  .  The  face  is  not  decontaminated,  as 
the  mask  is  donned  immediately  after  detection  and  normally 
not  removed  during  immediate  individual  decontamination.  The 
order  of  decontamination  within  the  category  (skin  or 
clothing)  is  in  the  numerical  order  of  the  body  areas.  After 
each  area  is  decontaminated,  the  chemical  protective  piece 
of  clothing  or  gear  is  donned.  Decontamination  and  donning 
times  are  drawn  from  user-defined  dis tr ibutions. 

Decontamination  performed  after  the  appearance  of 
symptoms  is  the  same  as  the  immediate  decontamination  except 
that  all  areas  of  the  body  (to  include  the  face)  are  decon¬ 
taminated.  The  donning  times  are  doubled  to  simulate  the 
time  required  to  remove  the  old  clothing. 

Because  decontamination  is  assumed  to  occur  under 
cover,  nc  additional  deposition  of  agent  during  decontamina¬ 
tion  is  allowed.  The  calculation  of  the  dosage  received 
during  decontamination  is  discussed  in  Appendix  A.  If  decon¬ 
tamination  is  omitted,  and  contamination  of  the  individual's 


sicm  and  clothing  has  occurred,  a  leakage  factor  will  auto¬ 
matically  be  assessed  for  all  body  areas  for  liquid  agents 
to  account  for  the  agent  trapped  under  the  protective 
clothing  when  it  is  denned. 

10.  First  Aid 

The  only  first  aid  treatment  explicitly  modeled  is 
injection  of  a  nerve  agent  antidote,  although  other  first 
aid  treatments  can  be  added  (see  Chapter  4)  .  This  can  be 
injected  wrongfully,  that  is,  without  evidence  of  symptoms, 
with  a  set  probability  when  detection  occurs  or  symptems  of 
any  chemical  agent  poisoning  occur.  The  effect  of  any  first 
aid  treatment  is  to  reduce  the  effective  dosage  by  a  given 
percentage . 

Antidote  injection  is  handled  as  fellows:  A  certain 
percentage  of  all  troops  in  the  area  of  deposition  will 
inject  themselves  with  an  antidote  for  nerve  agent  (atrepine 
or  seme  ether  substance  depending  upon  the  country)  regard¬ 
less  cf  the  type  of  agent  or  if  they  actually  receive  a  dose 
this  will  account  for  wrongful  injection  due  to  poor 
training  or  psychosomatic  inducement  of  perceived  symptoms. 
This  percentage  can  be  set  to  zero  for  troops  in  full  chem¬ 
ical  protection.  In  addition,  if  the  agent  is  a  nerve  agent, 
injection  of  atropine  will  occur  when  the  accumulated  dose 
reaches  the  impairment  dose  level  for  the  individual. 
Injection  of  the  atropine  will  cause  reduce  the  effective  IV 
dose  accumulated  by  the  individual  by  a  given  percentage. 

1 1 .  Dosage  Accu  mula tion 

Dosages  are  computed  by  converting  the  amount  of 
agent  deposited  on  bare  skin  or  inhaled  into  the  lungs  to  an 
equivalent  intravenous  (IV)  dose.  The  conversion  is  accom¬ 
plished  by  using  a  user-supplied  conversion  factor  for  each 
case  and  for  each  agent.  The  assumption  is  made  that  the 


absorption  of  agent  through  skin  and  through  the  lungs 
occurs  at  a  reasonably  constant  rate,  and  that  rate  car.  be 
expressed  as  a  percentage  of  the  deposition  or  concentration 
over  tine. 

It  is  recognized  that  an  identical  IV  dose  will 
effect  different  individuals  differently.  Rather  than  using 
the  median  dose  at  which  a  given  effect  occurs  (such  as  an 
LCt50,  the  dose  at  which  50%  of  all  individuals  exposed 
will  die)  as  a  threshold  for  all  personnel,  a  distribution 
(most  likely  normal)  is  specified  by  the  user  for  the  lethal 
threshold  dosages.  Unfortunately,  it  is  not  possible  to 
model  a  continuum  of  time  and  dosage  related  effects,  so  a 
set  threshold  is  established  at  which  the  individual 
abruptly  is  affected  at  the  level  specified  (is  impaired, 
incapacitated,  or  dies)  . 

At  the  time  the  temporary  entity  PERSON  is  created, 
a  random  draw  from  this  lethal  threshold  distribution  estab¬ 
lishes  his  unique  threshold  value,  and  stores  it  in  an  array 
pointed  to  by  an  attribute  of  the  PERSON.  Immediately 
afterward,  the  impairment  and  incapacitating  thresholds  are 
set  by  multiplying  the  lethal  threshold  by  user-supplied 
constants.  For  example,  impairment  may  occur  at  a  level  that 
is  40?  of  the  lethal  dose,  while  incapacitation  may  occur  at 
65%,  The  use  of  constant  fractions  of  the  lethal  dose  to 
determine  lesser  doss  thresholds,  rather  than  independent 
draws  from  different  distributions,  insures  that  the  dosages 
are  consistent  for  each  individual.  The  alternative  process 
of  making  separate  draws  from  impairment  and  incapacitation 
distributions  may  result  in  anomalies  such  as  the  same  indi¬ 
vidual  being  in  the  95th  percentile  for  an  incapacitating 
dose  and  the  5th  percentile  of  the  lethal  dose  (which  could 
result  in  a  higher  dose  for  incapacitation  than  for  death)  ! 
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When  multiple  agents  are  present  on  the  battlefield, 
all  dosages  and  dosage  effects  are  computed  separately  with 
no  interactions.  Reaching  the  impairment  dose  threshold 
results  in  the  appearance  of  symptoms,  so  only  the  first 
such  appearance  will  trigger  a  detection  event  (even  if 
symptoms  appear  later  from  a  different  agent,  all  reactive 
measures  have  already  been  applied).  The  dosages  are 
strictly  cumulative  with  no  time-related  recovery  permitted. 

C.  A  GENERAL  OVERVIEW  OF  THE  COMPUTER  PROGRAM 

The  routine  CHEM. CHECK  will  simulate  the  effects  of  a 
persistent  chemical  agent  attach  on  a  ground  force  unit. 
CHEM. CHECK  is  called  by  the  main  combat  simulation  for  each 
person  (me  . led  by  the  entity  PERSON)  alive  on  the  battle¬ 
field.  It  does  this  primarily  by  calling  upon  other  routines 
included  in  the  model. 

Tbs  actions  performed  by  each  routine  are  explained  in 
detail  in  Section  E.  A  general  overview  of  the  function  of 
each  routine  follows: 

1.  UPDATE  -  updates  depositions  at  the  location  of  the 
EERSCN  concerned,  updates  certain  global  variables  and 
arrays,  and  performs  changes  in  the  chemical  protection 
(collective  and  individual)  ordered  external  to  the 
model. 

2.  MASKING  -  simulates  donning  the  protective  masks,  and 
determines  leakage  (if  any)  . 

3.  OHC  -  simulates  the  assumption  of  overhead  cover  by 
entering  vehicles,  bunkers,  or  by  creating  temporary 
cover. 

4.  DECCN  -  simulates  the  immediate  emergency  decontamina¬ 
tion  of  the  skin  and  clothing. 

5.  DECCN2  -  serves  as  a  subroutine  to  DECON. 


6.  DEPOSITION  -  computes  the  currant  deposition  on  the 
outside  of  the  individual's  protective  clothing  (as 
cppcsed  to  his  collective  protection). 

7.  HOPE  -  simulates  donning  full  chamical  protection. 

8.  DETECTION  -  decides  if  the  PERSON  will  detect  the  pres¬ 
ence  of  a  chamical  hazard  from  physical  signs  cr  by 
being  warned  by  alarms  or  other  individuals. 

9.  NA A  -  simulates  the  injection  of  the  standard  nerve 
agent  treatment. 

10.  DCSE1  -  computes  the  accumulated  dosage  received 
through  the  current  time. 

11.  DOSE2  -  serves  as  a  subroutine  to  DOSE1 . 

12.  CHEMC AS.  EFFECTS  -  decides  if  tha  PERSON  has  passed  his 
impairment,  incapacitation,  or  lerhal  dose  thresholds 
due  to  accumulated  dosages. 

13.  SYMPTOM.  DETECT  -  schedules  detection  of  the  chemical 
agent  hazard  and  appropriate  reactive  measures  after 
the  appearance  of  symptoms,  if  detection  haa  not 
occurred  earlier. 

14.  CFCSSIN G  -  performs  the  functions  of  CHEH. CHECK  in 
situations  where  the  PERSON  is  crossing  an  area  of 
previously  deposited  contamination. 

15.  DOSE3  -  computes  the  accumulated  dosages  in  the 
crossing  situation  handled  by  the  CROSSING  routine, 
above. 

The  sequence  of  routine  calls,  illustrated  in  Figures 

1  and  3.2,  is  briefly  thus:  The  routine  CHEN.  CHECK  will: 

-  call  UPDATE,  which: 

-  calls  the  deposition  model  (NUSSE  II  or  equiva¬ 

lent)  . 

-  may  call  MASKING. 

-  Evaluate  the  chemical  situation.  If  the  individual  is 

moving  across  an  area  of  previous  contamination,  it 
will  call: 


-  CROSSING,  which  will  handle  all  subsequent,  routine 

calls . 

-  Check  to  see  if  artillery  has  landed  sufficiently 

close  to  the  PERSON  to  cause  him  to  take  cover  (react 
conventionally).  If  it  has,  CHEM.  CHECK  may: 

-  call  MASKING. 

-  Decide  if  the  person  will  assume  a  persistent 

chemical  threat.  If  he  will,  the  following 
sequence  will  be  called: 

-  OHC 

-  DECON 

-  MGPP 

-  If  detection  was  not  assumed  above,  and  has  not 

occurred  previously, 

-  DETECTION  will  be  called.  If  detection  occurs,  it: 

-  may  call  MASKING. 

-  may  call  NAA. 

-  will  call  OHC. 

-  will  call  DECON. 

-  will  call  MOPP. 

-  In  all  cases  except  where  control  has  passed  to 

CROSSING,  D0SE1  will  be  called. 

-  Next,  CHEMCAS. EFFECTS  will  be  called. 

-  NAA  may  be  called. 

-  If  symptoms  had  occurred,  but  detection  had  net, 

SYMPTOM.  DETECT  would  be  called. 

Many  of  the  routines  given  in  the  main  flow 
described  above  may  call  upon  other  routines,  as  shown  in 
Figure  3.1.  The  actual  routine  calls,  and  the  logic  that 
decides  if  a  call  is  to  be  made,  is  given  in  Section  E. 


D.  DATA  STRUCTU RE 


The  model  makes  extensive  use  of  attributes  and  global 
variables.  Although  some  arguments  are  used  between  routine 
calls,  because  of  the  complicated  structure  shown  above, 
this  is  the  exception  rather  than  the  rule. 

The  ability  to  handle  multiple  agents  and  sides  required 
most  variables  describing  the  state  of  the  individual  or 
states  of  nature  to  be  multi-dimensional  arrays.  Attributes 
must  be  singly  valued,  sc  many  attributes  store  pointers  to 
global  arrays  that  actually  contain  the  data  pertaining  to 
the  individual. 

There  are  four  bread  categories  of  variables  used  in  the 
model.  They  are: 

1.  Attributes  of  the  temporary  entities  PERSON,  VEHICLE  or 
ALARM.  These  describe  either  characteristics  of  the 
individual  (for  example,  his  individual  susceptibility 
threshold  for  the  various  agents)  ,  his  current  situ¬ 
ation  (his  levels  of  chemical  protection,  his  location, 
etc.)  or  the  time  at  which  events  occurred  or  actions 
where  completed  (for  example,  the  time  he  detected  the 
presence  of  a  chemical  hazard  or  the  time  he  donned  his 
protective  mask).  These  are  generally  provided  as  part 
of  the  main  combat  simulation,  although  some  attributes 
may  have  to  be  provided  by  the  user  of  the  model. 

2.  Situation  variables,  such  as  the  type  of  chemical  situ¬ 
ation  (listed  below  under  the  variable  CHEMSIT)  or  the 
side  (force)  that  the  PERSON  belongs  to.  These  are 
generally  set  within  the  model. 

3.  Physical  parameters,  such  as  the  alarm  detection 
threshold,  the  absorption  rate  of  the  agents  through 
skin,  the  amount  of  agent  picked  up  when  traversing 
contamination,  etc.  These  must  be  supplied  by  the  user 
of  the  model. 
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4.  Erotabilit ies  and  distributions.  The  logic  within  the 
routines  is  governed  by  probabilities  and  probability 
distributions.  These  oust  also  be  supplied  by  the  user. 

A  complete  listing  of  the  variables  is  provided  in  the 
glossary  found  in  Appendix  B.  A  brief  summary  of  the  major 
variables  used  is  provided  below  to  assist  in  reading  the 
following  documentation  of  the  routines. 

1  •  Attributes  of  Each  Person  and  Arrays  Pointed  to  by 

Them : 

(The  arrays  may  be  distinguished  by  the  extra  A 
added  to  the  prefix) 

AG.  COM  DOSE  ,  AGA.CU  MDOSE  -  Stores  the  dosage  accumu¬ 
lated  by  the  PERSON  for  each  agent. 

AG. IMPAIR,  AGA. IMPAIR,  T. IMPAIR,  TA.  IMPAIR  -  The 
first  two  refer  to  the  threshold  dosage  at  which  the  PERSON 
reaches  impairment;  the  second  two  refer  to  the  times  at 
which  this  occurs  for  each  agent. 

AG.  INCAP,  AGA. INCAP,  T.  INCAP,  TA.  INCA?  -  Same  as 
above,  for  incapacitation. 

AG.LETH,  AGA.LSTH,  I.LETH  -  Same  as  above,  for 
lethalities  (there  is  only  cne  time  of  death)  . 

ANTIDOTE,  A. ANTIDOTE  -  Stores  the  percentage  reduc¬ 
tion  in  the  dosage  caused  by  first  aid  treatment. 

CHEM.CHANGE,  CHANGE, ORDER  -  The  attribute 
CHEM. CHANGE  points  tc  the  array  CHANGE. ORDER,  which  is  used 
to  order  changes  in  the  chemical  protection  status  from 
outside  the  model. 

CCLCR  -  Used  to  identify  the  side  that  the  PERSON  is 
associated  with. 

CONTAMINATED,  T  .  CO  NT  AM  -  CONTAMINATED  shows  if  the 
PERSON  is  or  is  not  contaminated;  T.CONTAM  provides  the  time 
of  contamination. 
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CF,  l.CP  -  The  collective  protection  category  of  the 
individual  and  the  time  that  the  category  was  assumed. 

DEFNOM  -  The  defilade  of  the  individual,  ranging 
from  inside  a  foxhole  (1)  to  standing  up  (5)  . 

DEP.AIR,  DEE. A. CORE  -  the  current  concentration  of 
chemical  agents  in  the  air  at  the  PERSON'S  location.  The 
latter  variable  does  not  follow  the  array  naming  convention. 

EEP.GND,  DEF.G.CURR  -  The  current  deposition  of 
agents  at  the  location  of  the  PERSON. 

MASK,  T.MASK  -  The  mask  status  (on/off)  and  the  time 
that  the  mask  was  donned. 

MASKLEAK  -  The  amount  cf  leakage  to  vapor  of  the 


mas* . 


NAME  -  An  index  number  used  to  refer  to  the  indi¬ 


vidual  PERSON. 

PF.CHEM,  PFA.CHSM  -  The  current  protection  factors 
for  the  seven  body  areas,  and  the  time  that  the  protective 
item  was  denned. 

PE.  LEAK,  PF  A. LEAK  -  The  amount  cf  leakage  to  liquid 
agents  by  the  protective  garments. 

BCOND,  A.ROONE,  RDPTR  -  The  array  A . ROUND  stores  the 
times  and  chemical/ccnventional  status  of  all  rounds  that 
impacted  close  enough  to  the  PERSON  during  the  DELT  interval 
to  causa  him  to  react.  RDPTR  stores  the  length  cf  the  array. 

T.DECON  -  The  time  at  which  decon tamination  was 
completed. 

T.NAA  -  The  time  at  which  an  injection  of  a  nerve 
agent  antidote  was  given. 

T.OHC  -  The  time  at  which  overhead  cover  was 

assumed. 

VEH. STS. TYPE  ,  VEH. WFN. TYPE  -  Both  attributes  of  the 
PERSON,  these  identify  the  type  of  vehicle  which  he  is  in 
(when  applicable). 


2.  Major  Global  Var  i  abl  9S  (Other  Than  Arrays  Gi  yen 
Above) 

CHEMSIT  -  The  chemical  situation  of  the  individual 
during  the  current  iteration.  The  various  levels  are: 

0  -  Stationary,  not  directly  attacked  by  chemical  rounds. 

1  -  Directly  attacked  by  a  chemical  round  (stationary  or 

moving)  . 

2  -  Moving  in  an  area  of  previously  deposited  contamina¬ 

tion. 

3  -  Moving,  in  an  area  with  a  chemical  agent  present  in 

the  air,  not  directly  attacked. 

D.  prefix  variables  -  These  contain  or  relate  to 
probability  distributions,  indexed  by  various  parameters. 
They  are: 

D. IMPAIS 
D. IflCAF 
D.LETH 
D. MSKLEAK 
D . PF, LEAK 

ET.  prefix  variables  -  These  each  contain  a  prob¬ 
ability  distribution  for  the  time  it  took  to  perform  seme 
action,  indexed  by  various  parameters.  They  are: 

DT . DECCN 
DT . DETECT 
DT. MASK 
DT. NAA 
DT.OHC 
DT.  EF 

DELI  -  The  length  of  the  interval  between  iterations 
of  the  model. 

DEP.A.OLD,  DEP.G.OLD  -  The  concentrations  and 
depositions  for  the  previous  update. 


MIN.A.CHEM,  MIN.G.CHEM  -  The  minimum  significant 
level  of  concentration  of  agent. 

N. ALARM,  N .  VEHICLE  ,  N.  PERSON  -  The  total  rusher  of 
the  temporary  entities  ALARM,  VEHICLE  and  FERSON  created. 

N.SIDE,  N.  AGENT  -  The  number  of  sides  and  agents 

modeled. 

CLD .DOSE  -  Ihe  accumulated  dosages  at  the  last 

update. 

CLDCP  -  The  CP  category  previous  to  the  one  the 
PERSCN  is  currently  in,  if  he  changed  during  the  interval 
DELT  (otherwise  it  is  the  current  CP)  . 

FC.  prefix  variables  -  These  are  used  to  store  the 
probability  cf  performing  some  action.  They  are: 

PC . ACT.GHC 
PC. EEL. CECON 
PC.  IMM.DECON 
PC. MASK 
PC.MOPF 
PC. MSKLEAK 
PC. NAA 
PC. CHC 
PC. FF. LEAK 

EE. MAX  -  The  protection  factors  associated  with  the 
full  chemical  protective  ensemble. 

SKIN  -  The  skin  area  (square  centimeters)  associated 
with  each  bcdy  area. 

T.CHEMCURR  -  This  variable  serves  as  a  marker  for 
the  time  at  which  the  latest  action  performed  by  the  PERSON 
was  completed  -  used  when  scheduling  sequences  of  actions. 

I. CURRENT  -  The  current  simulation  time. 

TI  -  The  time  of  the  last  update. 


3.  Attribu t es  of  Each  Vehicle: 

NUMEER  -  an  index  number  used  to  refer  to  a  specific 

vehic le . 

CFEN. CLOSED  -  indicares  if  a  vehicle  is  open  or 
closed  (buttcned-up)  . 

4 .  Attributes  of  Each  Alarm : 

WARNING  -  Identifies  if  the  ALARM  will  sound  a 
warning  (thus  alerting  PERSONS  around  it). 

X. ALARM,  Y. ALARM  -  The  current  location  of  the 

alarm . 

5 .  Set  Ownershi  p  and  Members  hip : 

Every  VEHICLE  owns  a  CREW. 

Every  PERSON  may  belong  to  a  CREW. 

CREW  is  used  to  identify  PERSONS  who  are  crew 
members  cf  the  vehicle  in  which  they  are  riding  in  (rather 
than  passengers)  .  If  the  specific  vehicle  needs  ro  be  refer¬ 
enced,  the  attribute  NO.VEH  of  the  PERSON  identifies  the 
vehicle  number  (it  is  zero  if  the  PERSON  is  a  passenger  or 
net  in  a  vehicle)  ,  and  each  CREW  belongs  to 

VEHICLE  (VEH.PTR  (NUMBER) )  ,  the  vehicle  whose  memory  address 
is  pointed  to  by  the  pointer  VEH.PTR,  accessed  by  NUMBER. 

The  CREW  identification  is  used  directly  in  the 
model  to  determine  the  effective  leakage  of  agent  into  the 
vehicle  (it  may  be  different  in  some  vehicles  for  crew 
members  rather  than  passengers)  ,  and  it  also  can  identify 
PERSONS  who  will  not  dismount  in  the  main  combat  situation, 
and  who  may  be  incapacitated  or  killed  when  a  vehicle  is 
hit.  If  a  crew  member  should  enter  or  leave  a  vehicle,  the 
CP  change  can  be  accomplished  through  CHANGE. ORDER  but  the 
change  in  VEH.NO  and  being  filed  or  removed  from  the  set 
CREW  must  be  accomplished  outside  of  the  chemical  agent 
effects  icdel. 
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Additional  attributes  may  be  desired  when  imple¬ 
menting.  For  example,  vehicle  locations  will  be  needed,  and 
a  set  ownership  identifying  the  placement  of  alarm  devices 
may  be  useful.  These  may  be  added  depending  upon  the  main 
combat  simulation  model  used. 

E.  HCDB1  BCOTINES 

1.  The  Soutine  CEEM. CHECK 

The  CHEM. CHECK  routine  performs  the  following  tasks 
for  each  FEFSON  on  the  battlefield: 

1.  Drives  the  model  and  calls  all  other  routines. 

2.  Updates  the  depositions,  certain  global  variables,  and 
schedules  protection  changes  on  order  through  the 
routine  UPDATE. 

3.  Determines  the  chemical  situation  faced  by  each  person. 

4.  Schedules  automatic  reactive  measures  (if  any)  after 
artillery  rounds  impact  near  a  position. 

5.  Schedules  a  chemical  detection,  either  directly  or 

through  a  call  to  the  routine  DETECTION,  based  on  the 
situation.  When  a  chemical  hazard  is  detected,  sched¬ 
ules  the  appropriat  e  reactive  measures  (seeking 
overhead  cover,  decontaminating,  increasing 

protection)  . 

6.  Updates  the  dosage  through  a  call  to  the  routine  DCSE1 . 

7.  Assigns  times  at  which  dosage  thresholds  are  reached, 
and  reactions  (if  any)  to  symptoms,  through  the  routine 
CHEMCAS. EFFECTS  . 

CHEH. CHECK  is  the  master  routine  that  performs  the 
job  of  the  chemical  casualty  assessment.  CHEM. CHECK  is 
scheduled  to  be  run  every  DELT  seconds  after  the  initial  use 
of  chemical  weapons  (DELT  is  the  time  interval  delta  t 
between  checks  -  a  user  input,  it  is  recommended  that  DELT 
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be  less  bear,  or  equal  to  10  seconds  m  length).  The  routine 
is  iterated  over  all  PERSONS  stili  living  on  the  battle¬ 
field.  All  events  in  the  routine  CHEM. CHECK,  and  routines 
called  tv  it,  are  performed  as  directed  by  the  legic  for 
each  cf  these  PERSONS. 

CHEM. CHECK  begins  by  calling  the  routine  UPDATE, 
which  initializes  certain  temporary  variables,  assigns  the 
deposition  of  chemical  agent  j  at  the  location  of  the  PERSON 
to  the  arrays  DEP.G.OLD,  DEP.G.CURR,  DEP .  A.  OLD  and 
DEP.A.CURS,  and  checks  to  see  if  any  changes  in  protection 
category  or  individual  protection  have  been  ordered  during 
the  previous  DELT  seconds.  The  array  value  DEP.G.OLD  (j) 
represents  the  deposition  of  agent  j  on  the  person  at  the 
time  cf  the  previous  iteration.  DEP. G .CURR  ( j)  represents  the 
current  deposition  of  agent  j  or.  the  ground  at  the  person's 
current  location  at  the  current  update  time,  and 
DEP.  A. OLD  (-j)  and  DEP. A. CURR  (j)  represent  the  dosage  (accumu¬ 
lated  concentration)  in  the  air  (at  a  height  of  2  meters)  at 
his  location  at  the  last  update  and  the  present  time, 
respectively.  The  current  valued  arrays  have  their  pointers 
stored  as  attributes  of  the  PERSON,  so  a  record  is  kept  of 
the  most  recent  deposition. 

The  routine  next  initializes  a  temporary  variable, 
T.CHEMCURB,  to  equal  the  time  of  the  last  CHEM. CHECK  (time 
TL) .  T.CHEMCURR  is  used  to  keep  track  of  the  time  at  which 
any  action  scheduled  in  the  routine  was  completed  -  thus,  it 
represents  the  current  time  for  actions  performed  by  the 
given  individual  within  the  routine  CHEM. CHECK. 

The  next  actions  separate  out  several  possible  situ¬ 
ations  that  the  FERSCN  concerned  might  be  involved  in.  The 
current  situation  for  the  individual,  once  determined,  is 
stored  in  the  variable  CHEMSIT.  He  may  be  stationary  (no 
movement  in  the  last  DELT  seconds)  ,  and  not  directly 
attacked  by  a  chemical  agent  (CHEMSIT  0).  He  may  have  been 


directly  attacked  by  a  chemical  agent,  defined  as  being 
inside  the  ellipse  of  conventional  effects  from  an  incoming 
chemical  round,  and  be  stationary  or  moving  (CHEHSIT  1)  .  He 
may  be  moving  in  an  area  that  has  prior  contamination, 
defined  as  any  area  where  there  is  agent  cn  the  grcund  but 
not  in  the  air  (CHEMSIT  2)  .  Or  he  may  be  moving,  in  an  area 
with  chemical  agent  present  in  the  air  (a  chemical  agent 
cloud),  but  not  in  the  area  directly  attacked  by  the  chem¬ 
ical  round  (CHEHSIT  3).  These  categories  will  determine  the 
actions  taken  by  an  individual,  and  may  change  from  itera¬ 
tion  to  iteration  because  of  movement  of  the  person,  of  a 
chemical  agent  cloud,  or  because  of  a  round  landing  near 
enough  tc  be  considered  a  direct  attack.  If  the  PERSON  is 
moving,  his  attribute  T.OHC,  the  time  at  which  he  assumed 
overhead  cover,  is  set  to  zero  because  he  cannot  have  tempo¬ 
rary  overhead  cover  while  moving  (see  the  routine  OHC  for  a 
further  explanation  of  the  significance  of  overhead  cover 
and  T.OHC).  If  the  PERSON  is  in  CHEMSIT  2,  the  calculations 
will  be  handled  separately  by  routine  CROSSING,  otherwise 
routine  CHEM. CHECK  continues. 

The  routine  checks  to  see  if  the  PERSON  has  been 
contaminated  at  some  previous  time.  If  he  has  not,  and  his 
current  deposition  EEP.  G.CORR  is  greater  than  a  minimum 
significant  level  (represented  by  the  global  variable 
HIN.G.CHEM),  then  he  will  be  marked  as  contaminated  by 
assigning  a  value  of  1  to  the  attribute  CONTAMINATED  and  a 
time  of  contamination  T.CONTAM  based  on  the  ratio  cf  the 
HIN.G.CHEM  level  to  the  current  deposition  level. 

If  the  individual  has  already  detected  the  fact  that 
he  has  been  attacked  by  (or  exposed  to  the  hazards  of)  a 
chemical  agent,  then  the  program  moves  down  to  the  dose 
computation  sequence  EOS  SI .  The  reason  for  this  is  tha*  all 
reactive  measures  caused  by  a  chemical  attack  are  scheduled 
during  the  iteration  of  CHEM. CHECK  during  which  the 
individual  noticed  the  attack  or  hazard. 


If  he  has  net  detected  the  hazard,  the  routine 
checks  tc  see  if  he  was  in  the  immediate  effects  ellipse  of 
any  rcund  during  the  last  DELT  seconds  -  if  he  was,  he  might 
react  as  if  it  were  a  chemical  attack.  The  time  of  impact  of 
any  rounds  close  enough  tc  have  affected  the  PERSON 
concerned  is  stored  in  an  array  A.  ROUND,  pointed  tc  by  the 
attribute  RCUND.  An  additional  attribute,  RDPTR ,  gives  the 
length  of  the  rcund  queue.  The  array  A. ROUND  also  has  a 
(0,1)  bit  stating  whether  or  not  any  of  those  close  rounds 
were  chemical  -  if  sc,  CHEMSIT  is  updated  to  be  1.  If  the 
individual  was  not  attacked  we  go  to  the  detection  sequence 
to  see  if  he  can  detect  the  presence  of  a  chemical  hazard 
(if  any)  .  If  the  individual  was  attacked,  he  may,  through 
doctrine  or  choice,  regard  the  attack  as  conventional, 
rather  than  chemical.  His  decision  is  based  on  the  parameter 
PC.  MASK.  If  a  uniform  (0,1)  random  number  is  less  than 
PC.  MASK,  he  has  regarded  the  attack  as  conventional  (no 
chemical-peculiar  actions,  such  as  masking,  are  required)  . 
Because  this  probability  is  expressed  in  terms  of  the 
attack,  rather  than  each  individual  round  (as  a  result,  the 
probability  is  not  dependent  upon  the  number  of  rounds)  ,  the 
routine  will  then  go  directly  to  the  detection  sequence.  If 
the  PERSON  regarded  the  attack  as  potentially  chemical  in 
accordance  with  doctrine,  etc.,  the  current  time  at  which  he 
may  react,  I. CHEMCURR,  is  assigned  the  time  of  the  first 
round  that  impacted  close  enough  to  react  to  (which  was 
stored  in  the  temporary  variable  RDTIME)  . 

The  next  check  is  to  see  if  the  PERSON  is  in  a 
closed  vehicle  equipped  with  an  overpressure  system.  If  he 
is  (CP,  the  collective  protection  category,  equals  1),  then 
no  reaction  is  necessary  since  the  vehicle  is  closed  and 
operating  with  the  overpressure  system.  Since  this  protec¬ 
tion  is  identical  to  that  required  for  protection  against  a 
persistent  agent  attack,  the  PERSON  in  a  CP  equal  to  1  will 


have  detected  the  event,  with  the  time  of  detection, 
T.CHEMDET,  adjusted  accordingly.  This  process  is  followed 
independently  for  each  PERSON,  so  it  is  possible  tha* 
another  PERSON  in  the  same  vehicle  will  r.ot  have  defected 
the  attack.  This  dees  not  matter,  however  -  the  vehicle  is 
closed  so  the  protection  enjoyed  by  any  other  PERSON  in  that 
vehicle  is  the  same,  and  the  DETECTION  routine  will  schedule 
a  time  of  detection  cn  the  next  iteration  of  CHEM. CHECK 
through  proximity  to  the  PERSON  who  has  detected  (for 
further  details,  see  the  routine  DETECTION  later  in  this 
section)  .  after  his  detection  status  has  been  updated  the 
routine  will  go  to  the  dose  computation  routine  DOSE  1 . 

If  the  PERSON  was  net  in  an  overpressure  system, 
then  the  routine  checks  to  see  if  his  mask  is  cn.  If  net, 
masking  will  occur.  One  possibility  that  the  routine  checks 
fer  is  if  the  MASK  attribute,  which  determines  if  the  mask 
is  on  or  off,  was  just  set  to  1  (on)  during  the  update 
routine.  If  it  had  been,  then  the  mask  will  have  been  denned 
during  this  interval,  so  T.MASK,  the  time  at  which  masking 
was  ccmpleted,  may  be  inside  the  interval.  In  either  case, 
the  variable  T.CHEMCORR,  is  set  equal  to  T.MASK.  This  means 
that  any  future  action  scheduled  by  the  routine  (such  as 
donning  the  protective  suit)  will  begin  at  time  T.CHEMCORR, 
which  will  be  after  the  mask  was  donned. 

The  next  question  posed  by  the  routine  is  whether  or 
not  this  PERSON  will  react  as  if  the  round  contained  a 
persistent  chemical  agent.  This  question  is  different  from 
the  one  posed  before,  which  considered  masking  on  the 
assumption  that  there  is  chemical  agent  present.  Because  of 
the  significant  drawbacks  full  chemical  protection  under 
many  circumstances,  (heat  stress,  etc.)  ,  doctrine  and/or 
command  guidance  may  or  may  not  direct  that  any  indirect 
fire  attack  be  treated  as  a  potential  persistent  or  semi- 
persistent  agent  attack;  in  other  words,  doctrine  may  or  may 


not  direct  donning  full  chemical  protection  immediately 
after  any  indirect  fir®  attack.  At  this  point  we  are 
discussing  possible  actions  taken  by  a  soldier  after  a  round 
has  impacted  in  his  immediate  vicinity,  before  he  has  any 
chance  tc  verify,  through  detector  paper,  alarms,  or  ether 
means,  if  any  incoming  rounds  contained  a  chemical  agent. 
The  model  allows  the  user  to  set  the  probability  that  the 
PERSON  will  react  to  the  attack  by  donning  protective  items 
not  already  worn  through  the  global  variable  PC.tlOPP.  If 
PC. M CEP  *  1,  the  individual  will  don  full  protective  gear; 
if  PC. HOPE  =  3,  then  he  will  not.  The  user  can  make  this  a 
srochasric  event,  tc  account  for  incomplete  reaction  tc 
doctrine  cr  training,  individual  suspicions,  etc.  by  setting 
that  probability  PC. MOPP  at  some  intermediate  value. 

It  a  uniform  (0,1)  random  number  is  less  than 
EC.MOEP,  then  the  person  will  have  detected  the  presence  of 
chemical  agent  in  terms  of  his  future  actions  -  in  ether 
words,  he  has  assumed  that  a  hazard  is  present  and  will 
react  accordingly.  The  time  of  detection,  T-CHEMDET,  is  set 
equal  to  his  current  time  (T.  CHEMCCRR) .  The  routine  next 
calls  fer  the  appropriate  protective  measures  based  on  this 
detection,  which  is  accomplished  by  calling  the  routines  OHC 
to  seek  overhead  cover,  DECON  for  decontamination,  and  MOPP 
to  don  full  chemical  protection.  These  routines  are  called 
by  CHEM. CHECK  in  that  order,  and  actions  are  scheduled  as 
directed  by  the  routine's  logic.  The  attributes  referring  to 
the  time  that  a  given  action  was  completed  are  assigned 
values,  and  T.CHEMCtJRR  is  updated  to  keep  the  actions  in  a 
time  sequence.  The  reader  should  examine  the  documentation 
of  these  routines  later  in  this  section  to  see  how  these 
events  are  accomplished. 

If  the  PERSON  had  decided  not  to  mask  and/or  treat 
the  attack  as  a  persistent  agent  attack  (thereby  denning 
full  protection),  the  routine  DETECTION  is  called  to  see  if 


the  PERSON  will  detect  the  presence  of  a  chemical  agent  from 
signs  cr  from  proximity  to  others  who  have  detected  (or 
suspected  and  thus  reacted  to)  the  chemical  hazard.  The 
detection  routine  will  or  will  not  schedule  a  detection 
during  the  period  DELI  according  to  its  logic,  then  passes 
the  control  back  to  CE2M. CHECK. 

If  detection  had  occurred  during  this  DELT  period, 
then  all  reactions  to  that  attack  will  be  scheduled  by 
DETECTION  and  other  routines,  during  this  iteration  of 
CHEM. CHECK.  This  may  require  that  events  be  scheduled  to 
occur  at  some  future  time  -  if  it  does,  future  iterations  of 
CHEM. CHECK  will  check  for  this  by  examining  the  attributes 
which  contain  these  times  and  acting  accordingly. 

after  any  events  that  might  have  occurred  in  the 
period  DELI  are  scheduled,  the  routine  D0SE1  is  called.  This 
routine  calculates  the  total  dose  received  through  inhala¬ 
tion  and  skin  absorption  during  the  period  DELT.  This 
routine  will  check  the  attributes  of  the  PERSON  to  see  if 
any  changes  in  protection  occurred  during  DELT  (e.g. , 
masking),  and  adjust  accordingly.  This  dose  received  during 
DELT,  fcr  each  chemical  agent,  is  added  to  the  total  dcse 
accumulated  as  cf  the  last  CHEM. CHECK,  and  stored  in  the 
array  AGA.CUMDOSE  pointed  to  by  the  attribute  AG.  COM. DOSE. 

After  the  total  accumulated  dose  for  each  agent  has 
been  computed,  the  routine  CHEMCAS.  EFFECTS  is  called.  This 
routine  takes  the  accumulated  dose  and  determines  if,  based 
cn  that  dcse,  impairment,  incapacitation,  or  death  could 
have  occurred  to  that  person  during  DELT.  Impairment  is 
defined  as  the  point  at  which  symptoms  make  themselves 
apparent  to  the  victim,  so  further  reactive  measures  are 
scheduled  if  the  impairment  dose  is  reached  during  this  DELT 
interval  of  time.  The  updating  of  the  times  at  which  these 
thresholds  are  reached,  for  each  agent,  allows  this  categor¬ 
ization  tc  be  applied  to  other  areas  cf  the  model  (an 
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obvious  example  is  removing  the  PERSON  from  the  appropriate 
ALIVE  sat  when  death  occurs). 

2.  The  Routine  DPDATS 

The  UPDATE  routine  performs  the  following  tasks: 

1.  Initializes  certain  global  variables  to  the  correct 
values  for  the  PERSON  being  examined,  such  as 
CEP. G. OLD ,  DEP. A. OLD,  CLD.DOSE,  and  OLDCP. 

2.  Gets  the  current  ground  deposition  and  air  concentra¬ 
tions.  If  the  deposition  is  less  than  that  encountered 
previously,  computes  the  current  contamination  level  on 
the  PERSON,  taking  into  account  weathering. 

3.  Updates  CHEMDET,  the  attribute  that  gives  the  detection 
status  of  the  PERSON. 

4.  Schedules  changes  ir*  individual  and  collective  protec¬ 
tion  (CF,  OHC,  MASK ,  and  PF.CHEM)  ordered  by  *'he  main 
combat  simulation. 

The  UPDATE  routine  is  designed  to  update  the  deposi¬ 
tion  and  chemical  detection  status  of  each  individual  prior 
to  the  decisions  and  calls  made  in  the  routine  CHEM. CHECK. 
It  also  allows  the  chemical  protection  category  (individual 
and  collective)  to  be  changed  external  to  the  module,  by 
changing  values  in  the  1 -dimensional  array  CHANGE. ORDER, 
whose  pointer  is  stored  in  the  attribute  CHEM. CHANGE. 

After  the  old  accumulated  dosage  values  are  stored 
in  the  array  OLD. DOSE,  and  the  old  ground  and  air  deposition 
values  have  been  stored  in  the  global  arrays  DEP. G. OLD  and 
DEP.  A. OLD,  the  deposition  at  the  current  location  of  the 
PERSON  is  set  at  the  current  concentration  (at  z=0  meters 
for  ground  and  z=2  meters  for  air)  within  the  grid  drawn  by 
NUSSE  II.  Under  normal  circ umstances ,  the  outside  deposition 
on  the  individual  (that  is,  the  deposition  on  the  exterior 
of  his  collective  protection,  if  any,  and/or  his  individual 
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Figure  3.9  Soutine  UPDATE,  Continuation  B 


chemical  protective  garments,  if  any)  is  equal  to  the 
current  deposition  drawn  from  NUS5E  II.  However,  it  is 
possible  for  the  current  NUSSE  II  value  to  be  less  than  the 
previous  value  drawn  at  the  last  update  if  the  individual 
is  departing  an  area  of  contamination.  •  However,  the  true 
value  for  the  individual,  rather  than  the  terrain  he  is 
standing  upon,  will  continue  to  be  the  amount  of  agent  with 
which  he  was  previously  contaminated  (as  adjusted  for  decon¬ 
tamination)  .  As  a  result,  the  model  sets  the  actual  outside 
deposition  EEP.  G.CtJSK  ( j)  for  the  jth  agent  at  the  maximum  of 
the  current  NOSSE  II  deposition  (the  normal  case  scon  after 
an  attack  when  the  agent  is  still  settling)  or  the  previous 
level  EEE.  G.OLD  ( j)  ,  adjusted  for  a  decay  factor  AG .  DECAY  ( j)  . 
This  latter  factor  allows  for  tne  inclusion  of  natural 
weathering  factors  tc  reduce  the  agent  deposition  ever  time. 
AG. DECAY  represents  the  remaining  deposition  as  a  percentage 
of  the  deposition  present  DELT  seconds  earlier.  Although 
this  value  will  likely  be  very  close  tc  one  (little  decay 
occurs  in  less  than  10  seconds)  ,  it  will  allow  for  the 
inclusion  of  decay  provided  the  machine  arithmetic  cf  the 
computer  upon  which  the  model  is  run  allows  this  level  of 
precision. 

The  routine  updates  the  attribute  CHEM.DET  by 
assigning  it  a  value  cf  one  if  the  individual  had  a  time  of 
detection  assigned  (that  is,  he  did  detect  the  presence  of  a 
chemical  hazard)  during  the  last  iteration.  This  attribute 
is  used  to  determine  if  the  individual  has  detected  the 
(suspected)  presence  of  a  chemical  hazard  for  purposes  of 
warning  nearby  individuals. 

The  last  duty  performed  by  UPDATE  is  scheduling 
protective  status  changes  ordered  externally  to  the  module. 
Since  the  last  time  the  routine  CHEM. CHECK  (and  thus  the 
routine  UEDATE)  was  performed,  some  of  the  variables  of 
CHANGE. ORDER,  stored  in  the  attribute  CHEM. CHANGE,  may  have 


teen  given  non- negative  values  (the  array  is  initialized  at 
-1  for  every  value)  .  The  routine  first  checks  to  make  sure 
that  the  ordered  change  has  not  been  previously  implement ed. 
If  it  had  been,  no  changes  are  necessary.  If  the  firs-  vari¬ 
able,  CHANGE.  ORDER  ( 1)  was  set  at  one,  the  individual  was 
directed  tc  mask.  As  a  result,  the  MASKING  routine  is 
called,  the  time  of  masking  T.MASK  is  assigned  a  new  value, 
and  T.CHEMCDRR  updated  to  allow  for  scheduling  of  subsequent 
actions  in  UPDATE  (if  any)  . 

Changes  in  collective  protection  category  are 
considered  next.  These  changes  are  assumed  to  be  essen¬ 
tially  instantaneous  fcr  simplicity  of  calculation.  If  the 
change  will  require  any  significant  time  (for  example, 
exiting  a  vehicle  and  walking  to  a  foxhole)  ,  the  interme¬ 
diate  change  should  be  scheduled  explicitly  (in  our  example, 
a  CP  change  from  vehicle  to  in  the  open  is  scheduled  first 
(to  account  for  the  walking  to  the  foxhole)  and  the  change 
from  being  in  the  open  to  in  the  foxhole  second).  If  the 
change  is  tc  C?  categories  1,  2,  or  3,  the  overhead  cover 
attribute  (OHC)  is  adjusted  as  well.  The  overhead  cover  can 
also  be  changed  separately  (CHANGE.  ORDER  (3)  =1)  .  This,  would 
occur  if  temporary  protection  were  ordered,  e.g.,  covering  a 
foxhole  with  a  poncho. 

Finally,  changes  in  the  individual  protection  for 
any  or  all  cf  the  seven  body  areas  can  be  ordered.  The  new 
level  of  protection  is  specified  in  the  CHA NGE.  ORDER 
subscripted  variable,  so  changes  to  protection  levels  less 
than  the  maximum  can  be  made.  This  allows  the  commander  to 
change  the  individual  chemical  protective  level  for  all 
PERSONS  in  a  given  unit  by  changing  the  appropriate  values 
within  CHANGE.  ORDER. 

After  each  action  directed  by  CHANGE. ORDER  is 
performed,  the  array  values  are  returned  to  -1. 


3.  The  Routine  MASKING 


The  routine  MASKING  performs  the  following  tasks: 

1.  Simulates  donning  of  the  protective  mask. 

2.  Assigns  the  tixe  that  masking  was  complete  to  the 

attribute  T.MASK,  updates  the  attribute  MASK  and  the 
array  values  PFA.CHEM(2)  and  TA.  PF. CHEM (2)  . 

3.  Determines  whether  or  not  the  mask  will  leak  with 

respect  to  vapor;  if  it  does,  determines  the  amount  of 
leakage  and  stores  the  value  in  the  attribute  M ASKLEAX. 

4.  Determines  whether  or  not  the  mask  will  leak  with 

respect  to  liquid;  if  it  will,  determines  the  amount  of 
leakage  and  stores  the  value  in  the  array  value 

FF A . LE AK ( 2)  . 

The  routine  MASKING  is  used  to  simulate  doming  the 
protective  mask.  It  is  called  whenever  the  model  events  call 
for  masking,  regardless  of  the  cause. 

The  routine  determines  the  time  it  took  this  PERSON 
to  don  the  mask  by  accessing  the  global  variable  DT .MASK, 
which  is  a  N.SIDE  x  3  array.  The  first  dimension  contains 
the  number  of  the  side  (i.e.,  the  force  with  which  the 
PERSON  is  assigned  tc)  ;  the  second  dimension  contains  the 
distribution  of  masking  times  (distribution  type  and  zero, 
one  or  twc  parameters).  A  random  number  is  drawn  from  that 
distribution  and  assigned  to  the  temporary  variable  T.M.D. 
The  attribute  T.MASK,  representing  the  time  at  which  the 
donning  process  was  completed,  is  set  at  the  current  simula¬ 
tion  time  for  the  individual,  T . CHEMCURR ,  plus  T.M.D,  and 
the  attribute  MASK  is  set  at  one,  indicating  that  a 
protective  mask  is  worn. 

Because  the  mask  also  provides  protection  to  body 
area  2  from  liquid  chemical  agent  hazards,  the  value 
PFA. CHEM  (2)  is  updated  to  show  that  added  protection,  and 
the  time  TA.PF.CHEM  (2)  is  changed  as  well. 
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Before  returning  to  the  calling  routine,  it  nusr  be 
determined  whether  or  not  the  mask  will  leak  due  to  improper 
donning,  agent  trapped  under  the  mask,  improper  sizing, 
tears,  combat  damage,  etc.  If  the  mask  had  been  tagged  as  a 
leaker  at  seme  earlier  time  (for  example,  this  occurs  if  the 
PERSCN  receives  some  deposition  of  the  agent  on  his  face  and 
dons  the  mask  without  decontaminating  his  face),  then  this 
question  has  been  resolved  and  the  routine  continues.  If, 
however,  the  possibility  of  the  mask  leaking  has  not  yet 
teen  resolved,  the  probability  chat  this  will  occur  is 
contained  in  a  global  variable  PC. 3 SK LEAK.  This  is  compared 
to  a  uniform  (0,1)  number  and  if  PC.3SXLZAX  is  greater  than 
or  equal  to  that  number,  the  mask  will  leak.  The  amount  of 
leakage,  expressed  as  the  percentage  of  the  outside  concen¬ 
tration  ct  chemical  agent  in  the  air  received  into  the  mask, 
is  set  by  accessing  the  N.SIDE  X  3  global  array  D.MSKLEAK, 
and  assigning  the  random  number  drawn  from  the  distribution 
indicated  by  the  array  to  the  attribute  MASKL3AK.  This 
percentage  is  assumed  to  be  the  same  for  all  airborne 
agents,  since  it  represents  a  measure  of  the  amount  of 
agent-laden  air  bypasses  the  mask's  filter  elements. 

A  similar  check  is  made  to  see  if  the  mask  will  leak 
with  respect  to  liquid  hazards.  Since  the  leakage  to  liquids 
and  vapors  is  likely  to  be  from  different  causes,  the 
issues  are  handled  separately.  If  the  mask  has  not  previ¬ 
ously  been  tagged,  the  variable  PC. PF .LEAK  (2)  is  compared  to 
a  uniform  (0,1)  random  number.  If  the  mask  will  leak  with 
respect  tc  liquids,  the  value  of  PF  A.  LEAK  (2)  is  drawn  from 
the  distribution  D.PF.LEAK. 

After  these  checks  have  been  made,  the  routine 
returns  to  the  calling  program. 


4 


•  The  Routine  DETECTION 

The  DETECTION  routine  performs  the  following  tasks: 

1.  Schedules,  through  assignment  to  the  attribute 
T.CHEMDET,  detection  of  a  chemical  agent  hazard  due  to 
physical  signs. 

2.  Schedules  detection  of  a  chemical  agent  hazard  due  to 
proximity  to  a  chemical  alarm  or  another  PERSON  that 
has  previously  detected  the  hazard. 

3.  Schedules  injection  of  a  nerve  agent  antidote  upon 
detection  of  the  hazard,  if  desired  (this  would  be  a 
wrongful  injection  based  upon  detection,  not  symptoms 
of  nerve  agent  poisoning)  . 

4.  If  detection  occurs,  calls  the  routines  OHC,  DECON  and 

aoFP. 

The  routine  detection  simulates  the  process  whereby 
an  individual  may  detect  the  presence  of  a  chemical  agent 
through  physical  signs,  such  as  smoke,  vapor,  or  mist,  or 
reaction  to  detector  paper;  through  the  use  of  chemical 
agent  alarms;  and  through  proximity  to  other  individuals  who 
have  detected  such  a  hazard  -  hearing  their  alarm  or 
noticing  their  reactions  (such  as  masking).  The  word  detec¬ 
tion  in  this  context  means  the  creation  of  a  mental  attitude 
or  suspicion  of  the  threat  sufficient  to  cause  the 
individual  to  react  as  if  there  was  a  chemical  agent 
present. 

The  routine  begins  by  checking  to  sea  if  there  is 
any  chemical  agent  present  in  the  ground  or  in  the  air  at 
the  PERSONS  location.  If  there  is  not  agent  present,  then 
it  is  assumed  that  detection  due  to  physical  signs  will  not 
occur,  and  the  routine  moves  down  to  the  point  where  it 
begins  to  check  for  alarms  or  persons  nearby.  If  there  is 
agent  present,  then  the  array  DT. DETECT  is  accessed. 
DT. DETECT  is  a  4  X  N. AGENT  X  5  X  2  X  3  array  which  is 
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Figure  3.11  Routine  DETECTION. 


accessed  according  to  the  chemical  situation  CHEMSIT 
(dimension  one)  ,  the  agent  (dimension  two)  ,  the  ccllec-1- iv^ 
protection  category  (dimension  three)  ,  the  mask  beir.q  cn  or 
off  (dimension  four),  and  the  type  of  distribution  and 
parameters  (dimension  five).  The  numbers  in  the  last 
dimension  define  a  distribution  of  the  probability  that  the 
individual  will  detect  the  presence  of  the  chemical  agent 
from  given  signs,  under  the  conditions  specified  in  the 
other  four  dimensions,  within  a  time  interval  DELT.  As  a 
probability,  the  value  must  be  a  number  between  zero  and 
cne,  so  the  BETA  distribution  is  recommended  as  a  general 
distribution  which  can  be  fit  by  the  user. 

The  number  drawn  from  the  distribution  DT. DETECT  is 
assigned  to  the  temporary  variable  PT.CHEMDET.  PT.CFEKEE? 
represents  the  probability  of  detection  during  this  itera¬ 
tion  frcm  the  glimpse  detection  model  discussed  in  Section  B 
of  this  chapter.  As  such,  it  is  compared  to  a  uniform  (0,1) 
random  number  to  determine  if  detection  occurred  during  the 
last  CELT  seconds.  If  PT.CHEMDET  is  greater  than  or  eonal  to 
the  random  number,  T.CHEMDET  is  assigned  a  value  according 
to  Equation  3.2: 

(1  -  PT.CHEMDET)  *  (1. CURRENT  -  T.CHEHCORR)  ♦  T.CHEMCORF 

(eqr.  3.2) 

This  formula  simply  assigns  the  time  of  detection  as 
the  reflected  probability  times  the  remaining  interval  of 
detection  (DELT  except  when  crossing  areas  of  residual 
contamination)  added  to  the  beginning  of  the  interval  of 
detection,  T.CHEMCURB. 

The  above  actions  are  performed  for  each  agent  with 
a  significant  ground  cr  air  concentration  present.  If  more 
than  one  agent  would  have  caused  detection,  T.CHEMDET  is  set 
at  the  earliest  time. 


The  next  task  performed  by  the  DETECT  routine  is  to 
determine  if  the  PERSON  detected  the  presence  cf  an  agent 
based  on  a  chemical  agent  alarm  or  by  noticing  a  person 
nearby  who  has  detected  the  agent.  He  is  allowed  to  see  or 
hear  any  ether  PERSON  or  ALARM  within  a  distance  cf 
ALARM  .DIST. MAX  (a  user-supplied  global  variable)  meters  from 
his  position  (to  simplify  matters,  his  current  position  for 
this  check  is  the  position  at  the  current  update  time)  .  In 
erder  for  a  PERSON  or  ALARM  to  warn  him,  it  must  have  previ¬ 
ously  detected  the  chemical  agent,  having  a  time  of 
detection  T.CHEMDET  less  than  or  equal  to  the  end  of  the 
last  iteration  (but  net  equal  to  zero,  which  indicates  that 
no  detection  has  occurred)  .  For  PERSONS,  this  means  that  the 
individual  detected  the  attack  during  the  previous 
CHEM. CHECK  iteration,  which  prevents  the  order  of  the 
sequence  cf  PERSONS  updated  during  the  current  iteration 
influencing  the  results  (that  is,  if  he  detects  in  this 
iteration,  he  cannot  warn  others  until  the  next,  so  an  indi¬ 
vidual's  chance  cf  detection  is  independent  of  whether  he  is 
updated  before  or  after  another  during  the  current  itera¬ 
tion)  .  The  ALARMS  are  updated  prior  to  the  PERSONS,  so  any 
alarm  that  sounded  during  this  DELT  being  examined  .  can 
influence  people  nearby. 

If  one  or  more  PERSONS  or  ALARMS  nearby  has  detected 
a  chemical  agent,  than  the  distance  in  meters  from  his  posi¬ 
tion  to  the  position  of  the  warning  entity,  ALARM . DIST,  will 
be  less  than  or  equal  to  the  distance  ALARM. DIST . M AX,  so  the 
PERSON  being  updated  will  have  a  time  of  detection  assigned 
to  him  based  on  Equation  3.  3: 

T.CHEMDET  =  Min  (NE  0)  [  T.CHEMDET,  ((ALARM. DIST  / 

ALARM. DIST.  MAX)  *  (T. CURRENT  -  T .  CHEMCURR)  ♦  T.CHEMCURR1 

(eqn  3.3) 


This  formula  represents  the  ratio  of  ALARM. PIST  over 
ALARM .DIST. MAX  times  the  detection  interval,  which  is  added 
to  the  current  simulation  time.  If  the  individual  happened 
to  detect  the  chemical  agent  through  physical  signs  and 
proximity,  he  is  assigned  the  earlier  of  the  two  times  as 
his  detection  attribute. 

If  he  failed  to  detect  the  presence  of  a  chemical 
hazard,  control  is  passed  back  to  CHEM. CHECK;  otherwise,  the 
current  simulation  time  T.CHEMCORE,  is  assigned  the  value 
for  the  PERSONS  detection  time,  T. CHEMDET. 

If  the  PERSON  is  inside  a  vehicle  with  overpressure 
(CP=  1)  ,  the  routine  returns  to  CHEM. CHECK  as  before  since  it 
is  assumed  that  soldiers  inside  closed  vehicles  with 
overpressure  will  net  need  to  react  to  the  detection  e v  n t . 

If  the  PERSON  is  not  in  a  CP  equal  to  1,  then  a 
check  is  made  to  see  if  he  is  masked.  If  not,  the  mask 
routine  is  called  and  T.CHEMCURR  is  updated.  A  check  is  made 
to  see  if  the  MASK  attribute  is  equal  to  one  because  of 
masking  scheduled  previously  (in  routine  UPDATE  or 
CHEM. CHECK)  ;  if  so,  it  is  integrated  into  the  current  event 
sequence  by  updating  T.CHEMCORR  to  that  T.MASK  value 
previously  assigned. 

The  next  check  is  made  to  sea  if  the  PERSON  will 
in:  "t  a  nerve  agent  antidote  based  on  a  panic  reaction  to 
the  detection  of  the  attack.  Doctrine  calls  for  atropine  or 
other  nerve  agent  antidote  (depending  upon  the  country)  to 
be  injected  only  after  symptoms  appear.  However,  if  the  user 
desires,  he  can  cause  a  certain  percentage  cf  the  treeps  to 
wrongfully  inject  themselves  with  antidote  by  setting  a 
nonzero  value  to  the  global  variable  PC.NAA.  If  a  uniform 


(0,1)  random  number  is  less  than  or  equal  to  PC.NAA,  then 
the  NAA  routine  is  called  and  injection  will  occur. 
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Since  the  PERSON  at  this  point  will  have  detected 
the  presence  of  a  chemical  agent  daring  the  iteration  (since 
he  has  net  yet  exited  the  routine)  ,  the  DETECTION  routine 
will  schedule  the  appropriate  reactive  measures  by  calling 
the  routines  OH C,  DECON,  and  HOPP.  Control  is  then  passed 
back  to  the  calling  routine. 

5 .  The  Routine  CHC 

The  routine  CHC  performs  the  following  tasks: 

1.  If  the  PERSON  is  net  already  under  overhead  cover, 
decides  if  the  PERSON  will  seek  overhead  cover  inside  a 
vehicle  or  bunker,  create  temporary  overhead  cover,  or 
fail  to  assume  overhead  cover  (thereby  implicitly 
assuming  that  thera  is  no  persistent  agent  *hreat  ir. 
the  air) 

2.  If  overhead  cover  is  created  or  assumed,  draws  a  time 
for  this  to  he  completed  and  assigns  it  to  the 
attribute  T.OHC. 

The  rounine  CHC  is  designed  to  simulate  the  seeking 
or  creation  cf  overhead  cover  as  a  reaction  to  the  detection 
(denoting  a  suspicion  rather  than  certainty)  cf  the  presence 
cf  a  persistent  chemical  agent  attack.  Doctrinally,  if  the 
PERSON  suspects  that  he  is  being  directly  attacked  by  a 
persistent  chemical  agent,  he  will  seek  overhead  cover  in 
the  form  cf  vehicles,  bunkers,  etc.,  or  create  temporary 
overhead  cover  by  covering  himself  with  a  poncho,  chemical 
protective  cape,  etc. 

The  routine  first  checks  to  see  if  the  persen  is 
under  overhead  cover  -  T.OHC,  the  time  that  overhead  cover 
was  assumed,  is  not  equal  to  zero,  and/cr  the  collective 
protection  attribute  CP  is  equal  to  1,  2,  cr  3.  If  the 
person  is  not  presently  under  overhead  cover,  the  prob¬ 
ability  that  he  will  seek  overhead  cover,  PROB,  is  compared 
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Figure  3.14  Soutine  OHC 


tc  a  random  uniform  (0,1)  number  as  before.  PROB  is  an 
argument  passed  to  it  by  the  calling  routine.  In  all  cases 
except  when  the  OHC  routine  has  been  called  by  *hs  routine 
DECON2,  this  variable  will  be  equal  to  a  global  variable 
PC. OHC.  FC.OHC  is  a  user-supplied  global  variable  that  sets 
the  probability  that  a  PERSON  who  has  been  directly  attacked 
by  a  chemical  agent  (CHEMSIT  =  1)  or  is  receiving  indirect 

fire  and  is  assuming  it  is  a  chemical  agent,  '  will  assume 
that  the  threat  posed  is  a  persistent  agent  and  that  in 
doing  so,  will  seek  overhead  cover. 

When  the  OKC  routine  is  called  by  the  DECCN2 
routine,  the  value  of  PROB  will  be  equal  tc  1,  since  decon¬ 
tamination  will  only  be  performed  under  some  type  of 
overhead  cover. 

If  the  PERSON  does  decide  to  seek  overnead  cover 
(PROB  was  greater  than  or  equal  to  a  uniform  (0,1)  random 
number),  he  must  either  enter  a  vehicle,  a  bunker,  or  create 
temporary  overhead  cover.  As  a  simplification,  it  is  assumed 
that  tha  relative  probability  of  choosing  one  of  these  three 
actions  can  be  expressed  in  a  single  global  variable  for  all 
PERSCNs.  In  reality,  this  would  depend  on  his  mission,  the 
distance  to  vehicles  and/or  bunkers,  whether  or  not  these 
vehicles  cr  bunkers  were  filled,  etc.  '  and  these  actions 
should  be  tied  in  with  the  combat  situation  represented  in 
the  main  combat  simulation.  This  detail  might  possibly  be 
added  at  a  later  date  as  an  enhancement  to  the  present  model 
(see  Chapter  4)  .  Users  concerned  about  this  can  set  rhe 
probabilities  of  the  first  two  actions  to  zero  and  force 
everyone  to  create  temporary  cover. 

The  probabilities  contained  in  PC. ACT. OHC,  the 
N.SIDE  X  2  array  that  contains  the  probability  of  going  into 
a  vehicle  (PC.  ACT.  0 HC  (SIDE,  1) )  and  the  probability  cf  going 
into  a  bunker  (PC.  ACT  .OHC  (SIDE  ,2) )  for  each  side.  The  prob¬ 
ability  cf  creating  temporary  overhead  cover  is  one  minus 


the  sum  of  the  other  two.  These  probabilities  are  compared 
to  a  uniform  (0,1)  random  number  to  determine  the  action 
that  will  be  taken.  The  time  required  to  assume  than  over¬ 
head  cover,  given  the  action  taken,  is  found  from  the  N.SIDS 
X  3  X  3  array  DT.OHC.  The  first  dimension  gives  the  side  of 
the  PERSON,  the  second  dimension  is  indexed  by  the  three 
acticns,  and  the  third  dimension  gives  the  distribution  and 
up  tc  two  parameters.  The  value  drawn  from  DT.OHC  is 
assigned  to  the  temporary  variable  T.OHC. D,  and  T.CP,  the 
time  that  the  new  CP  category  was  assumed  (when  applicable) 
is  T.OHC. D  +  T.CHEMCURR.  In  all  cases  the  time  that  tempo- 
rary  overhead  cover  was  created,  T.OHC,  is  T.OHC. D  plus 
T. CHEMCURS. 

6.  The  Routine  ECPP 

The  MOPP  routine  performs  the  following  tasks: 

1.  Checks  the  levels  of  chemical  protection  stored  in  the 
array  PFA.CEEM,  for  body  areas  1  through  7,  and 
rot; pares  them  to  the  levels  of  maximum  protection, 
EF.MAX. 

2.  If  any  of  the  levels  of  protection  have  associated 
times  indicating  that  the  denning  of  maximum  chemical 
protection  is  scheduled  (by  other  means,  such  as  on 
order)  but  hot  yet  completed  (the  time  that  denning  the 
protection  over  area  i  was  completed,  TA .PF.CHEM  (i) ,  is 
after  the  current  simulation  time,  T. CHEMCURR)  ,  then 
this  scheduled  donning  is  incorporated  into  the  current 
MOPP  sequence  by  assigning  T. CHEMCURR  the  TA.  PF.CHEM  (i) 
value. 

3.  For  areas  of  the  body  where  the  level  of  protection 
worn  or  scheduled  to  be  worn  is  not  the  maximum  level 
(full  chemical  protection),  the  routine  draws  the  time 
it  would  take  tc  don  the  item  from  the  distribution 
array  DT.  PF,  schedules  the  time  tha*  the  donning  would 


be  complete,  TA.PF.CHEM(i)  ,  updates  the  current  time 
for  that  PERSON’S  activities,  T.CHEMCORR,  and  assigns 
the  maximum  PF  level  to  the  appropriate  PF.CHEM 
attribute . 

4.  Determines  if  each  item  cf  protective  clothing  or  gear 
will  leak;  it  it  will,  assigns  a  leakage  factor  to  the 
array  PFA.LEAK. 

The  MOPP  routine  is  called  when  the  PERSON  suspects 
that  he  has  encountered  a  persistent  chemical  hazard,  and 
will  increase  his  level  of  protection  to  the  maximum  level 
cf  chemical  protection  specified  for  his  side  in  the  global 
variable  PF.  MAX  (i)  (i*1,...,7).  The  current  level  cf  protec¬ 

tion  for  each  bcdy  area  1  through  7  is  contained  in  the 
array  TA.FF.CH2a,  whose  pointer  is  stored  in  th -  attribute 
PF.CHEM.  This  level  of  protection  may  currently  be  wcrn 
(that  is,  the  time  that  level  was  assumed  is  in  the  past) 
or  scheduled  to  be  worn  (the  PERSON  is  in  the  midst  of 
chemical  actions,  and  is,  or  shortly  will  be,  donning  items 
of  chemical  protection  per  order,  thus  the  time  at  which  the 
item  is  on  the  PERSON,  TA.P  F.CHEM  (i)  ,  is  in  the  future). 

If  the  PERSON  is  currently  wearing  an  item  of  full 
chemical  protection  (e.g.,  the  protective  mask,  which  will 
protect  body  area  2)  ,  then  the  routine  checks  to  see  if  the 
denning  cf  this  item  has  beer,  completed  or  is  scheduled  to 
be  completed  at  some  time  after  the  individual’s  current 
simulaticn  time,  T'.  CHEMCOR  R.  If  the  item  has  already  been 
donned,  then  the  routine  will  loop  to  the  next  body  area  in 
numerical  erder  (which  is  also  the  logical  donning  order,  by 
design).  If  the  item  is  scheduled  to  be  donned,  then  this 
scheduling  is  worked  into  the  current  schedule  by  assigning 
T. CHEMCURR  the  time  at  which  that  scheduled  action  will  be 
completed,  before  moving  cn  to  the  next  body  area.  As  a 
result,  even  if  only  part  of  the  body  was  scheduled  to  be 
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protected  by  previous  orders,  rhose  scheduled  times  will  be 
worked  into  the  current  scheduling  sequence,  and  the 
routine  will  still  schedule  limes  for  the  remaining  insuffi¬ 
ciently  protected  body  areas.  If  all  items  of  the  body  have 
been  protected,  the  routine  will  return  to  the  calling 
routine.  Note  that  T. CHEMCURR  has  been  updated  in  cases 
where  the  individual  has  been  scheduled,  but  has  not  yet 
completed,  donning  full  protection. 

Fcr  each  area  of  the  body  which  has  not  v=t  been 
afforded  full  protection,  the  routine  enters  the  array  DT.PF 
tc  obtain  the  appropriate  distribution  from  which  ~o  draw 
the  time  it  took  to  den  that  particular  item  of  protective 
clothing.  DT.PF  is  a  4-dimensional  array,  ordered  by  system 
type  (7ZH.  SYS.  TYPE)  ,  dimension  one;  by  weapon  type 
(VEK.  WPN.TYPE)  ,  dimension  two;  the  seven  body  areas,  dimen¬ 
sion  three;  and  the  distribution  type  wirh  two  parameters, 
the  fourth  dimension.  Use  of  the  system  and  weapon  type 
dist irguishes  between  the  two  sides,  and  allows  different 
values  to  oe  assigned  tc  the  distributions  depending  upon 
the  job  cf  the  individual  -  a  crew  member  on  an  Ml  tank  may 
take  longer  to  don  full  protection  than  an  infantryman  in 
the  epen,  fcr  example. 

If  an  item  of  protective  clothing  has  been  denned  at 
this  time,  the  routine  will  check  to  see  if  this  item  of 
gear  will  leak  due  tc  tears,  combat  damage,  improper  donning 
cr  fit,  agent  trapped  under  the  clothing,  etc.  It  dees  this 
by  comparing  a  uniform  (0,  1)  random  number  to  •‘■he  prob¬ 
ability  that  a  given  item  of  full  chemical  protection  over 
body  area  i  will  leak,  PFA.LEAK(i).  If  it  will,  the  amount 
cf  leakage,  expressed  as  a  percentage  of  the  deposition  or. 
the  outside  cf  the  garment,  is  drawn  from  the  distribution 
D.  PF .  LEAK ,  an  N.SIDE  X  7  X  3  distribution  (the  number  of 
sides  by  the  seven  tody  areas  by  the  distribution  type  and 
two  parameters),  and  assigned  to  the  array  PFA. LEAK,  whose 
pointer  is  stored  in  the  attribute  PF.  LEAK. 


If  the  protective  mask  was  donned  (body  area  2)  ,  m 
addition  tc  assigning  values  to  TA.  PF.CHEM  (2)  ,  PFA.CHEM(2), 
and  FFA.LEAK{2)  ,  the  routine  will  update  the  values  for 
T.  MASK,  MASK,  and  MASKLEAK  in  a  similar  manner  (for  further 
discussion,  see  the  BASKING  routine  in  this  section). 

After  full  chemical  protection  has  been  assigned  to 
all  seven  body  areas,  and  the  leakage  (if  any)  has  been 
assessed,  the  MOPP  routine  returns  to  the  calling  program. 

7.  The  Soutine  CECON 

The  routine  EECON  performs  the  following  tasks: 

1.  Separates  cut  the  case  of  immediate  decontamination 
after  initial  detection  of  the  chemical  agent  hazard 
from  the  case  cf  delayed  decontamination  after  the 
appearance  of  symptoms  of  chemical  agent  poisoning. 

2.  For  immediate  decontamination: 

a.  Determines  if  decontamination  will  occur  using 
the  parameter  PC. IMM. EECON. 

t.  If  decontamination  does  not  occur,  checks  to  see 
if  any  body  area  with  less  than  the  maximum  level  cf  chem¬ 
ical  protection  was  contaminated.  If  so,  sets  a  PFA.LEAK 
value  to  account  for  agent  trapped  under  the  protective 
garment. 

c.  If  decontamination  does  occur,  schedules  deconta¬ 
mination  of  the  skin  first,  then  clothing  second,  through 
calls  to  routine  DECCN2.  The  time  required  to  decontaminate 
multiple  agents  on  the  skin,  if  applicable,  is  added  tc  the 
time  required  to  decontaminate  one  agent  using  a  multiplier 
AG.  MOIT.  EECCN. 

3.  For  delayed  decontamination: 

a.  Schedules  decontamination  of  all  body  areas 
through  calls  to  DECCN2. 


Figure  3.19  Soutine  DECON,  Continuation  C, 


U 
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Figure  3.20  Routine  DECOH,  Continuation  D 


t.  Adds  the  time  required  to  remove  items  of  protec¬ 
tive  clothing  before  decontaminating  by  doubling  the  donning 
time . 

4.  Determines  if  the  protective  mas*  will  leak  using  the 
parameter  PC.tJSKLEAK.  If  it  will,  sets  a  value  or.  the 
attribute  HASKLEAK. 

5.  Calculates  the  total  dose  received  during  decontamination 
fcr  each  body  area  by  calling  the  routine  DEC0T2,  then 
summing  across  all  body  areas  to  give  the  total  dosage 
fcr  each  agent. 

6.  If  the  decontamination  period  extends  beyond  T.CUE3ENT, 
then  the  average  dose  that  would  be  received  during  each 
D2LT  period  from  the  current  time  (T.  CH2MCUF.H)  until  the 
time  decontamination  is  complete  (T . DECON )  and  assigns 
this  average  DELT  dcsa  to  the  array  AG A. DECON . DOSE  whose 
pointer  is  stored  in  the  attribute  AG.  DECON.  DOS E. 

The  DECON  routine  is  designed  to  simulate  the  decon¬ 
tamination  cf  any  areas  of  the  body  that  are  not  covered  by 
full  chemical  protection  at  the  time  that  the  chemical  agent 
is  detected,  or  all  areas  of  the  body  in  the  event  that 
decontamination  is  performed  at  the  time  that  symptoms 
become  apparent. 

It  is  assumed  that  ^.here  are  three  times  when  decon¬ 
tamination  might  be  performed.  The  first  is  immediately 
prior  to  donning  full  chemical  protection  after  the  detec¬ 
tion  of  a  chemical  hazard.  If  the  individual  suspects  that 
the  hazard  was  posed  by  a  persistent  or  semi-persistent 
chemical  agent  (vice  a  nonp ersistent  agent),  and  that  seme 
agent  may  have  landed  on  the  body,  he  will  decontaminate 
those  areas  not  covered  by  full  protection.  This  implicitly 
assumes  that  the  person  will  decontaminate  clothing  as  well 
as  skin  net  covered  by  a  chemical  protective  garment,  prior 
to  donning  the  garment.  This  assumption  is  justified  by 


95 


examining  the  alternatives  presented  to  the  individual  :  if 
he  dens  the  garment  without  decontaminating  exposed 
clothing,  the  effect  will  likely  be  worse  than  if  he  delayed 
donning  until  decontamination  could  be  accomplished,  since 
he  would  trap  agent  under  the  garment  and  contaminate  the 
inside  of  the  protective  garment. 

The  second  time  that  a  person  might  decontaminate  is 
when  he  has  detected  the  appearance  of  symptoms.  If  he  is 
not  in  full  chemical  protection,  these  symptoms  will  prob¬ 
ably  induce  him  to  assume  contamination  and  react 
accordingly,  depending  on  the  agent  involved.  Similarly, 
even  if  he  is  in  full  protection,  the  appearance  of  symptoms 
may  induce  the  removal  of  the  protection,  hasty 
decontamination,  and  renewal  of  tne  protection. 

The  decision  nods  between  the  two  circumstances  is 
the  attribute  T.  IMPAIR.  If  T.  IMPAIR  is  not  equal  to  zero  for 
the  agent  concerned,  then  symptoms  have  appeared; 
otherwise,  they  have  not. 

The  third  time  that  decontamination  may  be  required 
is  when  crossing  an  area  of  contamination  without  full  chem¬ 
ical  protection.  When  a  person  discovers  that  he  has  been 
traversing  an  area  contaminated  with  a  persistent  chemical 
agent,  he  will  decontaminate  all  exposed  areas  and  don  full 
protection.  The  probabilities  are  bypassed  in  this  case 
since  it  is  assumed  that  decontamination  will  occur. 

The  deposition  on  the  PERSON  is  assumed  to  be  the 
linearly  interpolated  value  between  his  cld  deposition 
DEP.G.OLD  and  his  current  deposition  DEP.G.CORR.  This  is 
found  by  calling  the  routine  DEPOSITION  with  both  the  start 
and  end  times  equal  to  the  current  simulation  time 
T.  CHEMCURF. 

If  the  PERSON  has  not  shown  symptoms,  the  prob¬ 
ability  of  his  assuming  that  the  agent  is  persistent  and 
that  he  is  contaminated  is  expressed  in  rhe  global  variable 
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PC. I  UK. EECON.  If  he  chooses  not  to  decontaminate,  then  a 
check  is  made  to  see  if  he  was,  in  fact,  contaminated.  If 
he  was,  then  the  values  in  the  array  PPA.LEAK  (whose  pointer 
is  stored  in  the  attribute  ?F . LEAK)  are  assigned  positive 
values  in  all  cases  where  his  current  protection  factor  for 
body  area  i  (PFA . CBEM (i) )  is  not  the  protection  factor 
belonging  to  the  maximum  chemical  protection  (PF.KAX(i)), 
reflecting  the  fact  that  he  will  have  agent  trapped  under 
his  protective  garments  when  he  chooses  to  don  them.  If  he 
does  choose  to  decontaminate,  then  he  will  do  sc  for  all 
areas  of  the  body  not  currently  fully  protected. 

The  exposed  skin  is  decontaminated  first.  This  is 
accomplished  by  calling  the  routine  DSCON2.  All  areas  that 
were  not  exposed  skin  (??  =  1)  or  fully  protected  (?F  = 

PF.MAX)  are  decontaminated  next  through  a  call  to  routine 
EEC0N2. 


For  each  area  not  fully  protected,  a  time  to  both 
decontaminate  and  den  the  appropriate  protective  item  is 
determine o  based  on  the  2<*3IDE  X  N .AGENT  X  7  X  3  array 
DT.DECON.  The  first  dimension  indicates  the  side  of  the 
PERSON;  the  second  dimension  indicates  the  agent;  the  third, 
the  area  of  the  body;  and  the  fourth,  the  distribution  type 
and  up  tc  two  parameters.  The  time  to  accomplish  the  decon¬ 
tamination  of  that  body  area  and  don  the  item  of  protective 
clothing,  T.DECON.D,  is  added  to  T.CHEMCDRR  is  computed 
through  a  call  to  the  routine  DECQN2.  DEC0N2  serves  as  a 
subroutine  tc  actually  compute  the  decontamination  times  and 
dosages  received  during  that  time  for  each  area  of  the  body 
for  all  agents  present  on  the  skin. 

If  the  situation  involved  delayed  decontamination, 
then  the  sequence  above  is  followed,  except  all  body  areas 
are  decontaminated  regardless  of  the  level  of  protection  at 
the  time  decontamination  is  performed.  The  times  to  dscon 
and  den  the  protective  garment  are  doubled  to  reflect  the 
time  to  remove  the  old  protective  item  and  decontaminate  it. 
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After  each  decontaminated  area  is  covered,  a  leakage 
factor,  if  any,  must  be  determined.  The  probability  -hat  a 
given  protective  item  will  leak  due  to  inadequate  decontami¬ 
nation,  improper  donning,  tears,  combat  damage,  etc  are 
reflected  in  a  global  array  PC. PF. LEAK.  The  variable 
PC. PF. LEAK  (i)  is  compared  to  a  uniform  random  number  to 
determine  if  the  protective  garment  covering  skin  area  i 
will  leak.  If  it  will,  then  the  amount  that  it  will  leak, 
PFA . LEAK  (i)  ,  expressed  as  a  percentage  of  the  deposition  on 
the  exterior  of  the  protective  item,  is  drawn  from  a  distri¬ 
bution  determined  by  the  7X3  array  D.PF.LEAR.  The  first 
dimension  indicates  the  body  area  concerned;  the  second 
indicates  the  distribution  type  and  up  to  two  parameters. 

This  leakage  factor  for  the  mask  is  determined  in 
the  same  manner  as  for  the  protective  areas  of  the  tody, 
using  the  probability  that  it  will  leak,  PC. MSKLEAK  and  the 
array  containing  the  distribution,  D.MSKLEAK.  The  signifi¬ 
cant  difference  between  the  two  is  that  the  hASKLEAK 
attribute  reflects  the  leakage  of  agent  found  in  the  air 
into  the  respiratory  system,  causing  an  inhalation  dose;  the 
PFA.  LEAK  array  values  reflect  the  leakage  of  skin  protection 
over  various  areas  of  the  body,  causing  an  absorption  dose. 

Eecause  the  decontamination  process  is  likely  to 
stretch  cut  ever  many  iterations  of  CHEH. CHECK,  and  because 
the  dosage  received  during  the  time  that  decontamination  is 
in  process  is  a  function  of  the  decontamination  rate  (the 
array  DCR)  ,  the  dosage  received  during  the  time  cf  deconta¬ 
mination  is  computed  by  calling  the  routine  DECON2 .  The 
reasoning  behind  this  calculation'  and  the  process  of 
determining  the  dose  is  found  in  Appendix  A. 
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8 .  The  Soutine  DZC0N2 

The  routine  DECON2  performs  the  following  tasks  for 
each  body  area: 

1.  Determines  how  many  agents  are  present  on  the  skin  and 
clothing  at  the  time  of  decontamination.  The  routine 
draws  the  time  to  decontaminate  the  first  agent 
I. DECON. D  from  the  array  DT. DECON.  If  multiple  agents 
are  present,  it  will  repeatedly  multiply  MOLT. AG. DECON 
*  T.  DECON.  D. 

I 

2.  Computes  the  dosage  received  during  decontamination  for 

each  agent  present.  In  the  case  of  crossing  a  contami¬ 
nated  area  on  foot  where  the  PERSON  remains  standing 
prior  to  decontaminating,  the  dose  is  computed  only 
ovar  areas  5,  6,  ana  7  (these  ara  the  only  areas 

assumed  contaminated  -  see  Section  B  at  the  beginning 
of  this  chapter) . 

3.  Schedules  the  denning  cf  protective  gear  and  assigns 
values  to  the  array  TA.PF.CHEM,  whose  pointer  is  stored 
in  the  attribute  T.PF.  CHEM. 

The  routine  DEC0N2  is  called  from  the  routine  DECON 
for  each  area  of  the  body  not  fully  protected,  so  the 
following  explanation  refers  to  each  area  separately. 

The  first  check  performed  by  the  routine  DEC0N2  is 
to  see  if  there  are  multiple  agents  causing  contamination 
(or  any  -  it  is  possible  for  a  person  to  suspect  contamina¬ 
tion  where  none  is  present)  .  For  the  first  agent,  a  time  to 
both  decontaminate  the  body  area  concerned  is  determined 
based  on  the  N.SIDE  X  N. AG  ENT  X  7  X  3  array  DT. DECON.  The 
first  dimension  indicates  the  side  of  the  PERSON;  the 
second,  the  agent  corcerned;  the  third  dimension  indexes  the 
area  of  the  body;  and  the  fourth,  the  distribution  type  and 
up  to  twe  parameters.  The  time  to  accomplish  the  decontami¬ 
nation  of  that  body  area,  T. DECON. D,  is  added  to  T. CHEMCURR, 
the  current  simulation  time. 


99 


Pigure  3.21  Soutine  DSCON2. 
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If  the  body  area  is  less  than  5  and  we  are  rr  the 
situation  where  the  PERSON  has  bean  crossing  a  contaminated 
area  (CHEMSIT  =  2)  cn  foot  (  CP  =  5  )  is  not  cont aminated 
(CONI  AM  I  NAT  EC  -  0)  ,  and  has  remained  up  until  decent  a  mi  na¬ 
tion  was  begun  (  DEFNUM  =  5  )  ,  then  no  dosage  is  assessed. 

Otherwise,  the  dosage  accumulated  during  the  decontamination 
of  that  tody  area  for  each  agent  is  computed  using  the 
methods  outlined  in  Appendix  A.  The  marginal  dose  for  the 
body  area  provided  as  an  argument  to  the  routine  for  each 
agent  is  stored  in  a  temporary  variable  DOSE2 PASS ,  which  is 
passed  between  the  routines  as  an  argument. 

If  decontamination  was  directed  (called  by  the 
routine  EECCN)  tut  there  was  no  contamination  present  (FLAG 
=  0) ,  decontamination  is  still  performed  and  T.CHEMCURR  is 
updated  by  a  value  T.PECON.D  drawn  frem  the  distribution 
DT. DE CON. 

After  a  body  area  has  been  decontaminated  if  is 
covered  by  a  chemical  protective  garment  with  a  protection 
factor  value  equal  tc  PF.HAX  (in  other  words,  full  chemical 
protection  is  assumed).  To  simulate  this,  a  value  T.PF.D 
representing  the  time  it  takes  to  don  the  standard  item  of 
protective  gear  for  the  body  area  concerned  is  drawn  from 
the  distribution  DT.FF  (for  details  on  this  array,  see  the 
section  cn  the  routine  MOPP  in  this  section) .  This  value  is 
added  to  T.CHEMCURR  to  yield  the  time  that  the  protection 
was  denned,  TA.PF.  CHEM  (i)  (i  =  the  body  area)  and  then 
T.CHEMCURB  is  updated  to  this  latest  time.  The  level  of 
protecticn  for  each  item  is  changed  to  the  level  of  full 
protection  PF.MAX,  as  each  item  is  donned. 

9.  The  Fbutine  CEPOSITION 

The  DEPOSITION  routine  accomplishes  the  following 

tasks : 


102 


CO*>UTE 

OEP.OLDC!). 

OEP.OLO<2) 


COMPUTE 

DEP.CURC), 

0CP.CUR(2) 


Routfrw 

DEPOSITION 


T.  ST  ART 
TL 


DEP.OLO(l)  ■ 
OEP.G.OLD 
OEP.OLO(J)  ■ 
OEP.A.OLO 


/  T.ENO  -  \ 

1 

r-CUSR£NT  fur* 

f  1 

DEP.CURC ! ) 


OLOCP  -  1 
OR  OLOCP 
-  2 


COMPUTE 
INDICES  OF 
SW. NBC. FILTER 


COMPUTE 

DEPU), 

DEP(2) 


OLOCP  •  3 


COMPUTE 

0EPC1). 

0EP(2) 


OLOCP  *  CP 


OLOCP  *  CP 


Figure  3.23  Routine  DEPOSITION 
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Figure  3.24  Soutine  DEPOSITION,  Continuation  & 


1.  It  computes  the  ground  and  air  dosage  at  the  given 
location  of  interest  at  any  intermediate  rime  within 
CELT  using  a  linear  approximation. 

2.  It  adjusts  the  deposition  received  on  the  ground  at  the 
PERSON'S  location  to  the  dosage  received  on  the  cuter 
layer  of  the  PERSON'S  clothing  or  skin  based  on  the 
collective  protection  category,  and  the  presence  of 
overhead  cover. 

The  DEPOSITION  routine  may  be  called  by  the  DOSE2 
routine  with  arguments  providing  the  start  time  T. START,  and 
the  ending  time,  T. END,  which  provide  the  interval  of  time 
over  which  the  deposition  must  be  computed.  The  firs* 
acticn  the  routine  dees  is  to  distinguish  between  the  cases 
so  it  can  come  up  with  an  approximate  ground  deposition  at 
an  intermediate  time  between  TL  and  T. CURRENT  if  necessary. 
The  previous  deposition  (time  TL)  at  the  PERSON'S  previous 
location,  calculated  the  last  time  CHEM. CHECK  was  called,  is 
stored  in  the  array  DEP.G.OL-D  for  each  agent.  The  current 
deposition  at  the  PERSON'S  location  (at  time  T. CURRENT)  is 
stored  in  the  array  DEP.G.CURR.  a  simple  straight  line 
interpolation  is  used  to  estimate  the  deposition  at  an 
intermediate  value.  This  intermediate  value  is  an  approxima¬ 
tion  ever  time  or  both  time  and  space  if  the  PERSON  moved 
during  DELI.  The  formulas  used  are  given  below  for  an  agent 
J: 


1.  Finding  the  starting  deposition  and  concentration 
when  the  starting  time  argument  (T. START)  is  not  the 
starting  time  of  the  iteration  (TL)  : 

DEP.CID(I)  =  (DEP.G.CURR(J)  -  DEP.  G.  OLD  (J)  )  *  (  (T. START  - 

TL)  /  DELT  )  +  EEP.G.OLD(J)  (eqn  3.4) 


DEP.  OLD  (2) 
TL)  / 


=  (DEP.  A  .CURR(J)  -  DEP.  A.  OLD  (J)  ) 
DELT  )  ♦  CEP.  A.OLD(J) 


* 


(T. START  - 
(egn  3.5) 
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2.  Finding  the  final  deposition  and  concentration  when  the 
final  time  argument  (T .  END)  is  not  the  ending  time  of 
the  iteration  (T. CURRENT)  : 

DEP.CUR(I)  =  {  (DEP.G.CURR  (J)  -  DSP.OLD(I))  *  (  (T .  END  - 

T.S1ARI)  /  (T.  CURRENT  -  T .  START)  }  +  DEP.QLD(I) 

(eqn  3.6) 

DEP  .CUR  (2)  =  {  (DEP.  A.CURR  (J)  -  DE?.OLD<2))  *  (  (T .  END  - 

T. START)  /  {T. CURRENT  -  T. START)  )  +  DEP.OLD(2) 

(eqr.  3.7) 

The  depositicn  used  to  compute  the  dcsage  is  simply 
the  average  of  the  depositions  for  the  interval  called  in 
the  arguments  to  the  routine,  as  adjusted  by  the  collective 
protection  category  (C?)  . 

The  routine  next  checks  the  collective  protection 
category  of  the  person  by  checking  the  global  variable 
OLDCP.  If  the  CP  category  is  changed  at  any  time  during 
BELT,  the  old  CP  value  is  stored  in  this  variable.  The  depo¬ 
siticn  routine  will  be  called  twice  by  DOSE2,  since  there 
was  a  change  in  CP  category.  As  a  result,  during  the  first 
call  ty  DCSE2,  when  the  routine  is  calculating  the  dose  from 
the  last  update  time  TL  to  the  time  the  CP  category  was 
changed,  it  will  use  the  original  CP  category  (OLDCP)  to 
determine  the  appropriate  deposition  adjustment  required.  It 
will  set  the  value  of  OLDCP  to  the  newer  CP  value  after 
doing  this,  so  that  the  next  time  DEPOSITION  is  called  by 
DOSE 2 ,  the  newer  CP  value  will  be  used.  If  the  CP  value  had 
not  changed  during  DELT,  the  UPDATE  routine,  called  before 
DEPOSITICN,  will  have  set  the  value  of  OLDCP  to  the  current 
CP  value,  contained  in  the  PERSON'S  CP  attribute. 

If  the  OLDCP  value  is  one  or  two,  the  PERSON  is 
inside  a  vehicle.  The  adjustment  factors  for  vehicles  are 
contained  in  a  six-dimensional  array  SW .NBC .FILTER,  which  is 


dimensioned  number  of  system  types  by  number  cf  weapon  types 
by  2  categories  of  PEBSON  (crew  or  passenger)  by  3  catego¬ 
ries  cf  vehicles  (closed  with  overpressure,  closed  without 
ever  pressure,  and  open)  by  2  agent  states  (vapor/aeroscl  or 
liquid)  by  the  number  of  agents.  The  value  contained  in 
the  array  indicates  the  percentage  of  the  outside  dosage  of 
agent  that  will  penetrate  into  the  vehicle.  This  value  is 
multiplied  by  the  average  dosage  over  the  interval  cf 
interest  to  yield  the  deposition  used  in  dosage 
calculations. 

If  the  OLDCP  is  three,  the  person  is  in  a  bunker. 
The  array  CEP. RED  is  used  to  calculate  the  reduction  in 
deposition  afforded  by  the  bunker.  The  global  array  DEC. BED 

.AGENT  X  3  X  2,  with  the  different  agent 
types,  3  categories  cf  protection  (bunker,  CF  =  3;  foxhole 
CP  =  4,  with  no  overhead  cover;  and  in  the  open  CP  =  5,  with 
overhead  cover)  and  2  agent  states  (vapor/aer csol  and 
liquid)  .  The  value  again  represents  the  percent  of  the  unad- 

ositicr.  will  penetrate  info  the  collective 

protection. 

If  the  OLDCP  is  four  (foxhole)  ,  a  check  is  made  to 
determine  if  the  foxhole  has  temporary  overhead  cover  (T.OHC 
not  equal  to  zero,  indicating  the  overhead  cover  has  been 
assumed).  If  it  has,  it  is  assumed  to  provide  the  same 
degree  of  chemical  protection  as  a  bunker,  and  the  dose  is 
computed  accordingly.  If  not,  a  different  value  from  DEP. BED 
is  multiplied  by  the  average  ground  deposition  to  give  the 
deposition  on  the  PEBSON. 

If  the  OLDCP  is  not  one,  two,  three,  or  four,  it 
must  be  five  (or  in  error)  ,  which  indicates  that  the  PERSON 
is  in  the  open.  A  check  is  made  to  see  if  temporary  overhead 
cover  has  been  assumed  (T.OHC  not  equal  to  zero).  If  it  has, 
the  third  index  in  the  second  dimension  of  DEP.  FED  is  used 
to  find  the  amount  of  agent  that  has  penetrated  under  the 


cover.  If  no  cover  has  been  assumed,  no  adjustment  is  made 
to  the  deposition  -  the  deposition  on  the  ground  at  the 
PESSCN’s  location  is  assumed  to  be  the  same  as  that  found  on 
the  PERSON,  and  the  average  of  the  old  and  current 
depositions  is  used  to  find  the  dosage  received. 

In  each  case,  the  OLDCP  value  is  assigned  the  new  CP 
value  after  the  deposition  has  been  calculated,  and  control 
returns  to  the  calling  routine. 

10.  The  Routine  DOS 51 

The  routine  DOSE  1  accomplishes  the  following  tasks: 

1.  It  determines  if  there  is  any  chemical  agent  present  at 
the  PERSON'S  location,  either  on  the  ground  (and  thus, 
cn  the  PERSON  if  exposed)  cr  in  the  air.  If  not,  the 
routine  exits  tc  the  calling  program. 

2.  The  routine  computes  the  dose  received  during  the 
previous  DELT  period  of  time,  if  not  already  computed. 
It  does  this  by  either  computing  the  dose  in  the 
routine,  or  by  calling  the  DOSE 2  routine. 

The  initial  check  provides  a  means  of  bypassing  this 
routine  ir.  cases  where  the  individual  is  not  in  an  area  of 
chemical  hazard  or  contaminated  as  of  the  current  time, 
T. CURRENT.  If  he  is  facing  either  a  ground  or  airborne 
hazard,  the  routine  must  compute  the  dose  received  from  that 
hazard. 

The  routine  first  checks  to  see  if  decontamination 
was  being  performed  in  the  DELT  interval  of  interest,  and 
has  net  yet  been  completed.  If  it  was,  the  dose  for  the 
interval  has  been  computed  by  the  DECON  routine,  and  the 
dose  to  be  accumulated  during  DELT  is  stored  in  the  array 
AG  A.  EECCN. DCSE ,  whose  pointer  is  stored  in  the  attribute 
AG. DECON. DOSE  (see  routine  DECON).  The  DOSE  1  routine  will 
update  the  accumulated  dose  by  adding  the  amount  in 
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AG A.  EECCN.  ECSE  to  the  value  contained  in  the  array 
AGA.CtJMDOSE  for  each  agent.  Control  is  then  returned  rc  the 
calling  program. 

If  decontamination  had  been  completed  during  the 
last  CELT  seconds,  the  routine  will  compute  the  dose  since 
decontamination  was  completed,  by  setting  the  beginning  of 
the  interval  over  which  the  dcsa  is  to  be  computed,  T.OLD, 
to  the  tine  decontamination  was  completed,  T.DECON. 

The  program  next  checks  to  see  if  masking  or  denning 
of  any  individual  items  occurred  during  the  DELT  peried  of 
interest.  If  masking  or  donning  an  item  had  been  completed 
during  the  CELT  period,  dosage  calculations  are  performed  at 
the  cld  level  of  protection  until  the  new  level  was 
completely  assumed,  then  at  the  new  level  cf  protection.  Fcr 
example,  if  the  mask  had  been  donned  during  CELT  and  the 
attribute  T.MASK  was  five  seconds  after  the  start  of  the 
interval,  then  the  routine  would  compute  the  dosage  received 
without  a  mask  for  five  seconds,  and  with  a  mask  worn  for 
the  remaining  (DELT  -  5)  seconds.  If  there  had  been  a 

completion  during  that  time,  the  T . MASK  or  TA . PF .CHEM  (i) 
(i=1,...,7)  completion  value  would  be  assigned  to  the  tempo¬ 
rary  variable  T.INT,  which  is  used  as  an  argument  for  the 
DOSE 2  routine.  Checks  are  made  to  see  if  two  or  more  events 
cccurred  during  DELT;  if  they  have,  the  dosage  is  computed 
over  each  interval  separately. 

The  routine  next  calls  the  D0SE2  routine,  which 
actually  computes  the  dosage  received  during  appropriate 
interval  and  assigns  the  cumulative  dose  to  the  array 
AGA . COMDCSE  for  each  agent.  Beth  inhalation  and  percutaneous 
dosages  are  considered,  and  converted  to  an  equivalent 
intravenous  (IV)  dose. 
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1  1  •  The  Routine  L;s52 

The  DOS E2  routine  accomplishes  the  following  task: 
It  computes  the  dose  received  during  the  interval  passed  to 
it  frcm  the  routine  DOSE  1  under  each  of  the  following 
circumstances: 

1.  No  action  was  taker,  during  the  given  interval  that 
would  have  affected  the  PERSON’S  chemical  protective 
status,  or 

2.  The  PERSON  changed  his  collective  protection  status 
during  DELT. 

The  routine  first  checks  to  see  if  the  collective 


protection  category  (CP)  changed  during  the  interval  passed 
to  it  (I. START  tc  I, END)  from  the  routine  DOSE1.  The 
DEPOSITION  routine  is  called  for  the  interval  T.  START  to 


T. CP  (the  time  that  the  collective  protection  category  was 
changed)  ,  then  the  dosage  is  computed,  the  DEPOSITION 
routine  is  called  again  and  the  remaining  dosage  computed. 
Changes  in  the  overhead  cover  category,  indicated  by  a  I.  CHC 
(the  time  overhead  ccver  was  assumed)  within  the  interval, 
are  handled  in  an  identical  manner. 

If  there  had  been  no  changes  in  protection  status 
during  the  interval,  the  DEPOSITION  routine  is  called  for 
the  entire  interval  T.  START  to  T.  END  and  the  dosage  is 

computed  at  one  time. 

The  DEPOSITION  routine  returns  the  effective  deposi¬ 
tion  on  the  outer  layer  cf  the  clothing  or  protection  (if 

any)  over  the  body.  The  amount  of  liquid  agent  reaching  the 

skin  is  this  deposition  value  multiplied  by  the  protection 

factor  of  the  item  of  clothing,  etc.  between  the  skin  and 
that  layer  of  deposited  agent.  The  protection  factor  for 
bare  skin  is,  of  course,  1.0  (100%  of  the  agent  is 

transmitted  to  the  skin)  . 


A  pressurized  vehicle  (CP  =  1)  is  the  only  system 
that  will  reduce  the  amount  of  vapcr/aerosol  that  reaches 
the  immediate  vicinity  of  the  PERSON,  so  no  adjustments  are 
made  to  the  airborne  concentration  of  agent  i,  found  in  the 
array  DEP. A. CURE  (i)  .  The  percutaneous  hazard  associated  with 
airborne  aerosol  or  vapor  agents  is  assumed  negligible,  sc 
the  only  hazard  posed  by  the  agent  is  the  inhalation 
hazard.  This  can  be  reduced  only  by  the  protective  mask,  so 
cnly  the  attributes  KASK  (indicating  if  the  mask  is  cn  or 
off)  and  WASKLEAK  (indicating  if  the  mask  leaks)  will  affect 
the  inhalation  dosage  received  by  the  individual. 

The  actual  calculation  of  the  dosage  received  during 
the  interval  is  explained  in  Appendix  A. 

12.  The  Soutine  CHE XC A S. EFFECTS 

The  CHENC AS .EFFECTS  routine  accomplishes  the 

following  tasks: 

1.  Simulates  the  injection  of  the  nerve  agent  antidote 
when  symptoms  cf  possible  chemical  agent  poisoning 
appear,  when  presented  with  an  actual  nerve  agent 
hazard,  and  when  detection  of  any  chemical  agent  hazard 
occurs . 

2.  Determines  if  the  impairment  dose  threshold  of  the 

PERSON  has  been  passed  for  each  of  the  chemical  agents, 
and  assigns  the  time  that  the  threshold  has  been 

reached  to  the  array  TA. AG. INCAP,  whose  pointer  is 
stored  in  the  attri but e ' T. AG. INCAP . 

3.  Calls  the  routine  SY MPTOH. DETECT  the  first  time  that 
an  impairment  dose  threshold  is  passed. 

4.  Determines  if  the  incapacitation  dose  threshold  of  the 
PERSON  has  been  passed  for  each  of  the  chemical  agents, 
and  assigns  the  time  that  the  threshold  has  been 

reached  to  the  array  TA.  AG.  INCAP. 
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5.  Determines  if  the  lethal  dose  threshold  has  beer,  passed 
for  any  agent.  If  it  has,  assigns  a  time  of  death 
through  the  attribute  T.LETH. 

The  CHE  MCA  S.  EFFECTS  routine  is  designed  to  translate 
the  accumulation  of  dosage  into  physical  effects,  that  is, 
reaching  a  level  of  impairment,  incapacitation  or  death.  It 
also  handles  the  simulation  of  the  possible  injection  of  a 
nerve  agent  antidote  by  the  soldier  by  calling  the  routine 
NAA. 

The  routine  begins  by  checking  to  see  if  the  impair¬ 
ment  dose  threshold,  found  in  the  array  AGA.  IMPAIR  whose 
pointer  is  stored  in  the  attribute  AG. IMPAIR,  has  been 
reached  for  any  chemical  agent.  When  an  impairment  doss 
threshold  is  reached,  a  time  of  impairment  is  assigned  to 
the  array  TA. IMPAIR,  whose  pointer  is  stored  in  the  attri¬ 
bute  T.  IMPAIR.  This  time  is  computed  by  a  simple  linear 
interpolation  shewn  in  equation  3.9.  The  dose  at  the  end  of 
the  last  iteration  is  contained  in  the  array  OLD.  DOSE,  a 
global  variable  updated  in  the  routine  UPDATE  for  each 
PERSCN. 

T. IMPAIR  (J)  =  [  (AGA.  IMPAIR  (J)  -  OLD.DOSE(J))  / 

(AGA.CUMDOSE(J)  -  GLD.DOSE(J))  ]  +  TL  (eqn  3.9) 

If  it  has,  and  an  impairment  dose  had  not  been 
reached  earlier,  the  the  routine  SYMPTOM. DETECT  is  called  to 
determine  if  the  onset  of  impairment  (causing  the  appearance 
of  symptoms)  will  result  in  the  scheduling  of  a  detection 
(if  a  chemical  hazard  has  not  already  been  detected)  .  If  two 
or  mere  agents  cause  impairment  during  the  same  DELT 
interval,  the  one  with  the  highest  number  is  arbitrarily 
used  to  call  SY MPTOM . DETECT .  The  temporary  variables  FLAG1 
and  FLAG2  are  used  to  keep  track  of  how  many  times  an 
impairment  dose  has  bean  reached,  and  what  agent  caused  the 
impairment. 
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a  nerve 


If  the  agent  causing  the  incapacitation  is 
agent,  then  injection  of  an  antidote  will  be  performed.  This 
is  accomplished  by  calling  the  routine  NAA.  The  possibility 
of  wrongful  injection  is  again  considered.  If  the  nerve 
agent  antidote  has  net  previously  been  administered,  then, 
when  symptoms  of  a  chemical  agent  appear,  it  is  possible 
that  the  soldier,  as  a  result  of  poor  training  or  panic,  may 
inject  himself  with  the  nerve  agent  antidote.  This  prob¬ 
ability  of  this  is  contained  in  the  global  variable  PC.NAA, 
which  is  dimensioned  as  a  vector  of  size  equal  to  the  number 
of  sides.  Users  who  wish  to  eliminate  this  option  may  simply 
set  this  variable  equal  to  zero.  If  injection  will  occur, 
based  on  the  comparison  of  a  uniform  (0,1)  random  number 
with  PC. NAA,  the  routine  NAA  will  be  called. 

The  routine  next  checks  to  see  if  the  dose  has 
reached  the  level  of  incapacitation  for  each  agent.  If  it 


has,  a  time 


incapacitation  from  that  agent  is  assigned 


through  the  array  T  A. AG  .INCAP  (i)  for  each  agent  i,  using 
equation  3.9  substituting  INCA?  for  IMPAIR.  Separate  array 
values  are  maintained  for  future  possible  discrimination 
between  different  agent  effects  in  multiple  agent  scenarios 
in  the  main  model,  instead  of  using  the  first  time  of 
incapacitation  as  a  single  attribute. 

If  the  incapacitation  dose  has  been  reached  for  cne 
cr  more  agents,  the  routine  checks  to  see  if  the  lethal 
threshold  has  been  reached.  If  it  has,  a  time  of  death, 
T.LETH  is  assigned  as  an  attribute  of  the  PERSON  in  the  same 
manner  as  above.  Unlike  the  case  with  impairment  or  incapa¬ 
citation,  the  FERSCN  can  be  killed  only  once;  future 
iterations  of  CHEH. CHECK  should  not  include  lethalities. 

This  routine  dees  not  translate  the  event  of  impair¬ 
ment,  incapacitation,  or  death  into  combat  effects;  this 
should  be  done  in  the  main  simulation  using  the  times 
attributed  to  each  PERSON.  The  ability  of  the  PERSON  should 
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be  degraded  appropriately  for  the  agent  and  level  of  effect, 
starting  at  the  time  a  level  of  effect  is  reached.  Chapter  4 
discusses  this  matter  in  more  detail. 

13.  The  Routine  SYMPTO M. DETECT 

Ihe  routine  SYMPTOM.  DETECT  accomplishes  the 
following  tasks: 

1.  If  the  PERSON  has  not  yet  detected  the  presence  or  a 
chemical  hazard,  the  routine  schedules  a  detection  at 
the  impairment  time  of  the  first  agent  to  cause  impair¬ 
ment.  The  onset  of  impairment  is  assumed  to  be  the  time 
of  the  first  appearance  of  noticeable  symptoms. 

2.  Regardless  of  when  defection  occurred,  the  routine  will 
call  the  routines  MASK,  OHC,  DECON,  and  MOP?  in  the 
same  manner  as  ether  routines  call  this  sequence  at  the 
time  a  chemical  agent  hazard  is  detected. 

The  SYMPTOM .  DETECT  routine  allows  the  appearance  of 
symptoms  to  initiate  the  realization  or  detection  of  the 
presence  of  a  chemical  agent  hazard,  wnich  causes  the  PERSON 
to  react  accordingly.  The  routine  only  acts  if  the  PERSON 
has  not  already  reached  an  impairment  dose  for  any  partic¬ 
ular  agent.  When  the  first  impairment  threshold  is  passed, 
marking  the  first  onset  of  symptoms,  this  routine  will  be 
called  by  the  routine  CHSMC AS. EFFECTS .  It  will  not  be  called 
at  any  other  time.  If  the  person  has  previously  detected  the 
chemical  agent,  then  he  has  already  taken  (or  is  scheduled 
to  take)  most  protective  actions  that  it  is  possible  for  him 
to  take.  However,  he  may  have  elected  not  to  perform  certain 
things,  and  hay  may  wish  to  perform  delayed  decontamination. 
For  this  reason,  the  routine  is  called  even  if  the  PERSON 
has  previously  detected  the  presence  of  a  chemical  agent 
hazard. 
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First,  t ne  PERSON  will  masit,  if  he  is  not  presently 
wearing  the  mask.  Note  that  this  will  occur  regardless  of 
the  CP  category,  unlike  before.  The  reason  for  this  is 
obvious  -  any  collective  protection  that  right  have 
prevented  a  person  from  masking  before  has  evidently  failed. 
If  masking  was  required,  the  detection  time  is  assigned  to 
the  time  that  the  mask  was  completely  donned  -  as  before, 
the  individual  will  not  have  detected  the  agent  from  the 
aspect  of  warning  others  until  the  mask  has  been  put  on.  If 
he  was  already  masked,  then  detection  is  scheduled  for  the 
moment  that  symptoms  occurred  (the  impairment  time  passed  by 
CHEMCAS.  EFFECTS)  . 

In  either  case,  the  individual  may  assume  overhead 
cover, if  necessary,  so  that  he  may  decontaminate  any  exposed 

ne  by  calling  the  rout  in®  CHC. 
The  DECON  routine  will  be  called,  and  the  prob¬ 
ability  of  delayed  decontamination,  contained  in  the  global 
variable  PC  . DEL .  DECO N ,  will  be  used  (the  DECON  routine  is 
found  in  this  section).  This  decontamination,  if  performed, 
will  be  ever  all  body  areas,  to  include  those  previously 
covered  fcy  protective  gear  (which  is  removed  and  replaced 
or  decontaminated).  If  decontamination  is  not  accomplished 
(which  would  result  in  an  increase  in  individual  protection 
to  full  protection)  ,  the  MOPP  routine  will  be  called, 
causing  the  individual  to  don  all  items  of  chemical 
protective  gear  not  already  worn. 

After  the  flO PP  routine  is  called,  the  routine  wall 
return  tc  CHEHC A S.  EFFECTS. 


14.  The  Routine  NAA 


The  NAA  routine  accomplishes  the  following  tasks: 

1.  Determines  the  time  of  the  injection  of  the  nerve  agent 
antidote,  and  assigns  that  time  to  the  attribute  T.NAA. 


DRAW  T.NAA.O 
FROM  OT.NAA 


T.CMtMCllflR  * 
T.CHEMCURR  ♦ 
T.NAA.O 

- i  " 

t.naa  * 
T.CHEMCURR 


2.  Updates  the  array  A. ANTIDOTE,  assigning  the  value 
contained  in  the  global  variable  NAA. FACTOR  to  the 
array  elements  corresponding  to  nerve  agents. 

The  NAA  routine  is  called  whenever  an  injection  of  a 
nerve  agent  anridote  is  tc  be  performed.  The  tern  nerve 
aoent  antidote  used  here  is  a  generic  one  referring  tc  the 
antidote  carried  by  the  soldier;  this  will  vary  according 
tc  his  nationality.  For  the  US,  the  current  antidote  is 
anropine.  The  time  it  takes  no  administer  the  nerve  ager.- 
antidote  is  drawn  using  the  array  DT.NAA,  which  is  dimen¬ 
sioned  N. SICE  (xhe  number  of  sides)  X  3  (rhe  distribution 
type  and  two  parameters)  .  The  result  is  added  to  the 
current  simulation  time  for  the  individual,  T.CHEMCURR.  This 
completion  time  is  also  assigned  tc  che  attribute  T.NAA. 

The  antidote  is  assumed  to  cause  a  reduction  in  the 
effective  dosage  received  by  the  PERSON,  which  can  be 
expressed  as  a  percentage  of  the  actual  dose  absorbed.  This 
percentage  is  contained  in  the  global  variable  NAA. FACTOR, 
which  is  dimensioned  as  a  vector  of  size  equal  to  the  number 
of  sides  or  forces  modeled.  Thus,  for  nerve  agents,  the 
actual  cumulative  dose  is  equal  to  the  nominal  accumulated 
dose  times  the  appropriate  NAA.  FACTOR.  Incorporation  of  this 
change  in  the  dosage  calculations  is  accomplished  through 
the  array  A. ANTIDOTE,  whose  pointer  is  scored  in  the  attri¬ 
bute  ANTIDOTE.  The  value  in  rhe  array  A. ANTIDOTE  is  changed 
from  its  initial  value  of  1  to  the  value  NAA. FACTOR  fcr 
every  agent  whose  type  is  nerve. 

15.  The  Routine  CROSSING 


The  CROSSING  routine  accomplishes  the  following 


tasks 


1.  simulates  the  protective  measures  that  wculd  be  taken 
by  ground  trocps  that  encounter  a  chemical  agent 
contamination  hazard  while  moving. 
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2.  Computes  the  dosage  that  would  be  received  by  troops 
crossing  an  area  of  prior  deposition. 

3.  Handles  all  calculations  in  lieu  of  the  routine 
CHEK. CHECK,  once  CHSM. CHECK  has  updated  the  situation 
and  found  that  it  involves  crossing  a  previously 
contaminated  area  (any  area  with  ground  deposition  but 
no  agent  in  the  air  from  primary  deposition)  . 

The  CROSSING  routine  handles  the  simulation  if  the 
chemical  situation,  CHEMSIT,  is  determined  to  be  a  case 
where  the  PERSON  is  moving  in  an  area  where  all  chemical 
agent  has  fallen  ontc  the  ground.  The  PERSON  may  be  entering 
an  area  of  chemical  agent  contamination  from  a  clean  area, 
or  he  may  be  moving  about  in  an  area  of  deposition  suffi¬ 
ciently  long  after  the  delivery  system  impacted  that  all 
agent  has  fallen  to  the  ground. 

The  detection,  reactive  measures,  and  dosage  calcu¬ 
lations  will  be  different  in  cases  involving  moving  ever 
contamination  as  opposed  to  being  attacked  by  an  agent  or 
encountering  a  chemical  agent  cloud.  The  first  check  the 
routine  does  is  to  see  if  CHEMDET  is  egual  to  1,  indicating 
that  the  PERSON  has  detected  the  presence  of  a  chemical 
agent  hazard.  If  he  has,  then  all  reactive  measures  will 
have  been  scheduled  through  attribute  assignments  and  the 
routine  can  call  the  dosage  computation  routine  directly. 
For  a  crossing  situation,  the  dosage  routine  is  D0SE3  (see 
this  section).  The  casualty  effect  sequence  CHEMCAS .EFFECTS 
is  called  next,  then  the  routine  returns  to  the  CHEM. CHECK 
routine . 

If  the  PERSON  has  not  previously  detected  the  pres¬ 
ence  of  a  chemical  agent  hazard,  then  the  routine  checks  to 
see  if  the  PERSON  was  in  contamination  previously  (DEP.G.CLD 
not  equal  to  zero  for  any  agent)  .  If  he  had  not  been,  then 
he  must  have  just  entered  an  area  of  contamination  and  the 
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beginning  pcint  for  any  chemical  effects  or  actions, 
T.CHEMCURE,  mast  be  set  at  the  time  at  which  he  first 
entered  the  contamination. 

It  is  assumed  that  the  deposition  at  his  previous 
area  was  zero  (it  really  could  have  been  just  under  the 
significant  level)  .  At  some  point  the  MIN.G.CHEM  threshold 
was  passed  en  route  tc  the  current  location.  For  simplifica¬ 
tion,  it  is  assumed  that  the  deposition  increased  linearly. 
The  point  cn  the  ground  at  which  the  MIN.G.CHEM  level  was 
reached  is  therefore: 

(MIN.G.CHEM  -  0  )  /  (DEP.G.CURR  -  0  )  *  the  distance  from 

(C  L  D  X  ,  C  LD  Y )  to  (X. CURRENT,  Y. CURRENT)  (eqn  3.10) 

A  time  OELT  was  required  to  make  the  move.  For  simplifica¬ 
tion,  it  is  assumed  that  the  move  started  at  the  beginning 
of  the  interval,  time  TL.  The  time  at  which  the  MIN.G.CHEM 
threshold  was  reached,  assuming  a  constant  speed,  is  there¬ 
fore: 

(MIN.G.CHEM/DEP.G.CURR)  *  D ELT  +TL  (eqn  3.11) 

This  value  is  used  tc  set  T.CHEMCURR  to  indicate  the  begin¬ 
ning  cf  the  chemical  crossing  situation. 

After  the  beginning  cf  the  chemical  encounter  has 
been  found  (it  is  TL,  the  last  update  time  if  contamination 
was  encountered  previously)  ,  the  routine  calls  the  DETECTION 
routine  in  the  same  manner  as  is  done  with  CHEM. CHECK;  the 
only  difference  is  that  if  detection  occurs  and  therefore 
the  DETECTICN  routine  calls  the  DECON  routine,  the  prob¬ 
ability  cf  decontamination  in  the  DECON  routine  is  set  at 
one;  when  crossing  contaminated  ground,  if  the  individual  is 
not  already  in  full  chemical  protection,  he  will 
decontaminate. 
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After  calling  tne  DECCN  routine,  one  D0SE3  routine 
is  called  to  compute  the  dose.  The  sequence  continues  by 
calling  the  CHE  MCA  S.  EFFECTS  routine  as  before  and  returning 
control  to  CHEM. CHECK,  which  will  return  to  the  main  ccafca* 
simulation  {this  is  the  end  of  the  iteration  for  this 
PERSON)  . 

16.  The  Routine  COS  E3 

The  DOS E3  routine  computes  the  accumulated  dose  for 
each  agent  in  situations  where  the  PERSON  is  crossing  an 
area  cf  previous  chemical  contamination. 

The  DOSE 3  routine  is  called  only  by  the  CROSSING 
routine;  as  such,  it  only  computes  the  acse  in  cases  where 
the  PERSCN  is  in  chemical  situation  two,  crossing  an  area  of 
previous  chemical  contamination  (see  the  CROSSING  routine  in 
this  section).  The  dosage  received  from  crossing  a  contami¬ 
nated  area  will  be  different  from  that  received  when  in  an 
area  where  agent  is  still  falling  toward  the  ground,  as  the 
only  agent  that  can  affect  the  individual  is  agent  picked  up 
from  contact  with  the  ground.  The  amount  of  agent  picked  up 
from  the  ground  will  depend  on  the  soldier's  collective 
protection,  his  mission,  and  the  pickup  rate  for  that  agent 
under  the  current  environmental  conditions. 

Certain  assumptions  have  been  made  about  the  pickup 
of  agent  while  moving.  They  are; 

1.  If  the  CP  =1  (inside  a  closed  vehicle  with  overpres¬ 
sure)  ,  there  will  be  no  effective  contamination,  and 
the  dose  will  be  that  computed  through  a  leakage  rate 
specified  in  the  array  SW. NBC. BREATHING.  This  is  done 
in  the  DOS 22  routine. 

2.  If  the  CP  *  2  (vehicle  not  equipped  with  overpressure), 
there  will  again  be  no  direct  contamination  assumed  and 
the  dosage  received  will  depend  on  different  leakage 
rates  found  in  SW.NBC. BREATHING ,  computed  in  D0SE2 . 
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If  the  CP  =  3  (bunker)  or  4  (foxhole)  ,  “hen  the  ?  is  SON 
cannot  be  moving  at  the  current  time.  If  he  had  been 
moving,  but  had  stopped  and  gotten  in  the  bunker  or 
foxhcle,  he  will  have  contaminated  himself  to  the  level 
found  cn  the  ground,  adjusted  by  a  pickup  factor.  This 
situation  can  be  handled  through  the  normal  rou“ine 
E0SE2. 


If  the  CP  =  5  (in  the  open)  ,  then  the  soldier  is  moving 
on  foct.  It  is  assumed  that  as  long  as  movement 
continues,  and  he  remains  standing,  the  only  contamina¬ 
tion  that  will  occur  will  be  on  the  legs,  feet,  and 
hands.  Dosage  will  be  computed  accordingly  depending 
upon  the  protection  factor  of  these  body  areas.  If  the 
tribute  is  equal  to  5,  he  is  standing.  Any 
ether  DEFNOH  value  indicates  that  he  is  nc  longer 
standing,  so  he  will  have  become  contaminated. 

5.  In  all  cases,  the  amount  of  agent  contaminating  the 
exterior  of  the  collective  or  individual  protection  of 
the  r E ?. 30 N  w il x  be  computed  as  tns  pic.tup  factor  zer 
agent  j,  AG. P ICKU? ( j ) ,  times  the  ground  deposition, 

CSP.G.CURR  ( j)  .  It  is  assumed  that  the  pickup  rate  will 
be  a  constant  function  of  the  ground  deposition  and 
that  this  pickup  rate  can  be  expressed  in  a  singl<=> 
global  array  value  in  AG.  PICKUP  for  each  agent  ever  the 
course  of  the  simulation  (or  until  changed  in  the  main 
simulation)  . 

The  routine  begins  by  adjusting  the  exterior  deposi¬ 
tion  EEP.G.CURR  by  the  AG. PICKUP  factor  for  all  agents.  The 
next  check  made  by  the  routine  sees  if  the  time  that  decon¬ 
tamination  is  complete  is  greater  than  or  equal  to  the 
current  time.  If  is  is,  then  the  dosage  received  has  been 
computed  with  the  DECON  routine  and  so  the  DOSE3  calcula¬ 
tions  are  not  needed.  The  routine  will  add  the  average 
dosage  accumulated  over  DELT  during  decontamination,  stored 


m  the  array  AG  A.  DECC  N.  DOSE ,  to  the  accumulated  dosage  varus 
in  array  AGA.  CUMDOSE,  for  sach  agent,  then  return  to 
CROSSING. 

The  next  check  that  is  made  is  to  see  if  the  dosage 
calculations  pertain  to  the  one  exceptional  situation  -  a  C? 
value  and  DEFNtJM  value  of  5,  indicating  a  PERSON  crossin  a 
on  foot,  remaining  upright.  If  the  case  is  not  exceptional, 
the  normal  dosage  calculations  apply,  so  tne  routine  D0SE1 
is  called.  Otherwise,  the  same  general  procedures  as  are 
used  in  ECSE1  are  applied,  only  dosage  is  only  accumulated 
ever  the  tody  areas  5,  6  and  7.  The  actual  desage 

calculations  are  contained  in  Appendix  A. 

If  T.DECCN  was  in  the  current  interval  DELT,  the 
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time  that  decontamination  was  completed,  I.DECON.  If  T.DSCON 
is  prior  to  the  last  update  (or  equal  to  zero)  ,  then 
decontamination  is  complete  (or  has  not  been  scheduled)  . 

The  routine  next  checks  to  see  if  any  other  prctsc- 
rive  actions  such  as  masking  (T.  NAS X)  ,  changing  protection 
(TA.  EF.  CEEM)  ,  etc.  ,  are  scheduled  during  DELT.  If  so,  a  local 
variable  l.INT  is  assigned  this  value,  and  will  be  passed 
as  an  argument  no  the  routine  DEPOSITION.  In  either  case, 
the  deposition  on  the  outside  of  the  PERSON  or  his 
collective  protection  has  been  adjusted  by  the  pickup 
factor. 

Desage  calculations  are  performed  only  for  body 
areas  5,  6  and  7.  Details  are  found  in  Appendix  A.  After  all 
dosage  calculations  have  teen  performed,  control  is 
returned  to  CROSSING. 


I?.  MODEL  BNH  ANC  BMENTS  AND  EXTENSIONS 

A.  MODEL  ENHANCEMENTS 

There  are  several  enhancements  to  the  basic  persistent 
chemical  agent  effects  model  presented  ir.  this  thesis  that 
can  be  made  by  an  individual  interested  in  implementing  the 
model.  The  model  structure  has  many  hooks  designed  to  make 
some  cf  these  enhancements  easier  to  coordinate  with  the 
existing  framework. 

One  major  enhancement  is  the  explicit  addition  of  non- 
persistent  agents  to  the  model.  This  is  not  as  big  a  task  as 
it  may  at  first  seem,  for  several  reasons.  You  may  recall 
from  the  introduction  the  fact  that  persistency  is  primarily 
a  matter  cf  environment  and  means  of  dissemination,  rather 
than  agent  type.  The  only  agent  class  normally  quoted  in 
threat  documents  that  is  truly  ncn-persistent  is  the  class 
of  bicod  agents.  All  other  normally  expected  agents  may 
require  seme  degree  cf  skin  protection.  As  a  result,  many 
nations  dictate  in  their  doctrine  that  the  reaction  to  any 
suspected  chemical  agent  attack  is  the  same  -  to  treat  it  as 
if  it  where  persistent,  and  so  don.  full  chemical  protection. 
Only  later,  when  tests  with  detector  kits  or  ether  means 
have  verified  that  no  persistent  threat  is  present,  will 
protection  be  removed.  This  verification  process  may  be 
time-consuming  and  deferred  until  much  later  in  an  active 
combat  situation.  As  a  result,  the  persistent  agent  effects 
model  can  be  used  to  model  the  non- "trsistent  agents  as 
well,  with  no  changes  required  for  scenarios  of  relatively 
short  duration. 


It  may  be  desireable,  however,  to  model  differ snt 
doctrine,  situations,  or  scenarios  that  call  for  a  reduction 
in  chemical  protection.  As  a  result,  some  modifications  need 
to  be  made  in  the  model  to  accommodate  this.  The  attributes 
CONTAMINATED  and  T.CCNTAM  have  been  included  to  serve  as  a 
flag  for  contamination.  It  may  be  possible  to  combine  these 
attributes  with  ethers  in  IF- type  statements  to  change  the 
logical  flow.  Alternatively,  CHEMDET  cculd  have  values  0, 
1,  2,  or  3  (no  detection,  detection  of  one,  the  other,  or 
both)  . 

Several  points  in  logic  and  attribute  assignment  hav® 
been  kept  separata  to  accommodate  non-persistent  agent 
modelling.  The  attribute  MASK  and  the  value  PFA.CHEM(2)  may 
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racial  area  ana  mo sr  n<e  ly  rarer  no  r he  same  piece  or 
protective  gear  (mask  with  hcod)  .  However,  the  MASK  attri¬ 
bute  refers  to  protection  against  inhalation  hazards  only, 
and  a  MASKLEAK  refers  only  to  leakage  of  vapor  or  aerosol. 

The  PFA.CFEM{2)  value  refers  to  protection  against  oercu-a- 

\ 

nsous  absorption.  Thus,  the  MASK  attribute  can  be  used 
separately  from  the  FFA.CHEM  array  in  non-persistent  situ¬ 
ations.  In  logic,  the  separate  parameters  PC.  MASK  and 
FC.MOEP  make  it  pcssible  to  differentiate  between  the 
assumption  cf  a  non-persistent  chemical  attack  (PC.  MASK)  and 
a  persistent  attack  (PC.MOPP).  Seme  changes  will  have  to  be 
made  to  tie  DETECTION  and  SY  MPTOM.  DETECT  routines  to  avoid 
the  automatic  assumption  of  full  chemical  protection  and 
consideration  of  decontamination  after  detection.  The  dosage 
calculations  will  not  require  alteration;  with  a  nonpersis- 
tsnt  agent,  DEP.G.  CURE  (the  current  ground  deposition)  will 
always  equal  zero  so  only  an  inhalation  hazard  will  be 
calculated. 
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Implicit  m  the  Flay  cf  non-persistent  agents  is  me 
requirement  for  the  reduction  of  chemical  protecticr.  The 
very  nature  cf  a  non-persistent  agent  will  permit  reduce  ion 
in  protecticn  within  the  time  frames  normally  associated 
with  high-resolution  simulations.  Decision  logic  needs  to  be 
added  no  the  main  combat  simulation  to  decide  when  tests  are 
tc  be  made  tc  verify  the  absence  of  a  chemical  hazard,  and 
removal  cf  protection  if  warranted.  This  is  normally  accom¬ 
plished  cr.  a  unit,  rather  than  individual,  basis.  Once  the 
decision  has  been  made  to  remove  the  protection,  the  actual 

removal  car  be  ordered  through  changes  in  the  array 

CHANGE. CEDE?  for  each  PERSON  in  the  unit.  Changes  in  the 

protecticn  factors  for  body  areas  1  through  7  can  be  accom¬ 

plished  using  the  current  model;  ur  masking  can  be 
accomplished  by  assigning  a  value  cf  1  to  CHANGE.  ORDER  (5) 
{body  area  2)  ,  and  separately  changing  the  value  of  the 
attribute  MASK  to  zero. 

Any  MCPF  changes  upon  order  (increasing  cr  decreasing) 
may  be  accomplished  by  putting  the  PFA.CHZH  (protection 
factor)  values  for  all  standard  MOFP  levels  in  an  array  and 
putting  all  PERSONS  into  sets  by  unit  (which  would  normally 
be  dene  anyway)  .  Then  for  all  PERSONS  in  a  given  unit,  the 
values  of  CHANGE. ORDER  (4)  through  CH ANGE . ORDER  ( 1  0)  could  be 
assigned  the  appropriate  vector  from  the  MOP?  array.  The 
pointer  for  the  array  CHANGE.  ORDER  is  stored  in  the 
attribute  CHEH.  CHANGE. 

Once  the  decision  logic  has  been  established  for 
changing  chemical  protection,  it  will  be  possible  to 
consider  modelling  the  degradation  resulting  from  a  given 
level  of  protection.  In  Chapter  2  (Doctrine),  the  problems 
associated  with  wearing  chemical  protective  garments  were 
discussed.  This  degradation  may  be  the  primary  reason  for 
and  the  major  effect  cf  the  employment  of  persistent  chem¬ 
ical  agents.  It  wculd  not  be  possible  to  model  this 


degradation  without  a  basic  model  framework  such  as  '•ha- 
provided  in  this  thesis.  Now  that  the  framework  has  been 
provided,  implementations  should  include  some  type  of  degra¬ 
dation  effects  model,  A  degradation  model  would  be  dependent 
upon  the  main  combat  model  employed  and  should  interact  with 
virtually  all  modules  of  the  model. 

The  CHC  (overhead  cover)  routine  can  be  enhanced  by 
explicitly  modeling  the  distance  of  the  PERSON  from  vehicles 
and  bunkers  that  he  might  use,  the  capacity  and  availability 
of  these  to  the  PERSON,  and  using  this  information  to 
provide  a  better  representation  of  the  actions  that  might  be 
taken  upon  receiving  a  persistent  agent  attack. 

First  aid  other  than  injection  of  a  nerve  agent  antidote 
may  be  added  to  the  CRESCAS .  EFFECTS  routine.  The  use  of  the 
array  A. ANTIDOTE,  dimensioned  by  the  number  of  agents  to  be 
played,  allows  the  effects  of  the  first  aid  to  be  explicitly 
considered.  For  example,  a  redaction  factor  might  be 
applied  to  the  dosage  effects  of  a  blister  agent  after 
decontamination  was  performed. 

The  proximity  section  of  the  DETECTION  routine  allows 
for  seme  modelling  of  the  NBC  Warning  &  Reporting  System  by 
altering  the  CHEMDET  status  of  the  PERSON  receiving  the 
warning  ever  the  net.  However,  this  only  can  be  used  whan 
the  warned  unit  is  immediately  threatened,  as  receipt  of 
the  warning  will  cause  the  adoption  of  full  protection  and 
causes  the  unit  to  assume  that  they  are  in  the  presence  of 
contamination.  Modelling  NBC  intelligence  will  require 
separate  logic  and  implementation. 

Partial  and  complete  decontamination  may  be  added  to  the 
model,  with  the  attribute  CONTAMINATED  serving  as  a  flag. 
Decision  logic  incorporated  into  the  main  combat  simulation 
will  be  required,  as  partial  and  complete  decontamination 
are  normally  unit  functions  performed  on  order  rather  than 
individual  actions  based  on  the  situation  and  doctrine.  It 
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is  recommended  that  separate  routines  be  established  to 
model  this,  possibly  cn  a  unit  rather  than  individual  level. 


E.  RECOMMENDATIONS  FOR  FUTURE  EPFORTS 

The  model  presented  in  this  thesis  depends  extensively 
upon  the  use  of  probabilities  at  decision  points  and  prob¬ 
ability  distributions  to  model  the  time  it  takes  to  perform 
actions  and  the  effectiveness  of  such  actions.  The  validity 
of  such  a  model  depends  heavily  upon  the  assumptions  made  in 
deriving  these  distributions. 

This  problem  is  endemic  throughout  most  stochastic  chem¬ 
ical  modelling  effort,  as  data  that  provides  a  reasonable 
fit  to  the  situation  being  modelled  is  often  difficult,  if 
net  impossible,  to  obtain.  Many  models  make  implicit  distri¬ 
butional  (or  binary  yes/nc)  assumptions  within  the  logic  and 
thus  seemingly  avoid  these  difficulties;  however,  it  becomes 
difficult  to  change  cr  improve  upon  these  assumptions  as 
data  becomes  available.  It  is  recommended  that  the  user 
exercise  the  utmost  care  in  deriving  the  ?aram-t=rs  used  in 
this  model  (almost  all  of  which  must  be  explicitly  set  by 
the  user)  ,  document  the  justification  of  the  figures  used, 
and  conduct  a  sensitivity  analysis  to  see  which  parameters 
significantly  affect  the  main  combat  model. 

The  detection  routine  may  be  be  represented  as  a  dynamic 
function  of  the  situation  and  time  rather  than  a  repeated 
comparison  against  a  probability  distribution.  The  author  is 
unaware  of  any  models  presently  written  that  could  usefully 
be  incorporated  in  the  present  high-resolution  persistent 
chemical  agent  effects  model;  this  issue  merits  further 
research. 

Nc  synergism  has  been  assumed  between  chemical  agents 
simultaneously  present  on  the  battlefield.  Interactions, 
both  physical  and  physiological,  should  be  examined  for 
possible  significance. 


Pickup  of  chemical  agents  from  a  contaminated  area  has 
been  treated  as  a  simple  percentage  of  the  agent  present, 
and  transfer  of  such  agents  to  uncontaminated  areas  have 
been  ignored .  Sene  engineering  and  test  data  are  available 
on  the  issue;  methods  of  practicably  modelling  the  matter 
should  be  explored. 


Interactions  between  conventional  and  chemical 
casualty-prcducing  effects  have  not  been  considered.  For 
example,  the  fragmentation  effect  of  a  chemical  round  has 
not  been  modelled;  the  effects  of  fragmentation  on  chemical 
protective  garments  has  only  implicitly  been  considered 
through  a  leakage  factor.  Studies  tend  to  consider  the  ques¬ 
tions  separately;  however,  the  issue  of  contamination  of 
personnel  bearing  conventional  wounds,  and  the  decontamina¬ 
tion  and  treatment  thereof,  may  prove  very  important  in  a 
battle  where  persistent  chemical  agents  are  used.  The 
related  issue  of  evacuation  and  decontamination  of  chemical 
casualties  is  also  worthy  of  future  modelling  effort. 
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APPENDIX  A 
DOSAGE  CALCULATIONS 


A.  DOSAGE  RECEIVED  SHILE  D ECO NTAHIHATIHG 

1 .  Assumptions 

a.  There  exists  ABS  (j)  =  rate  at  which  j  is  absorbed 
int  the  tody  such  that 

Absorbed  dose  j  =  ABS  <j)  *  contaminated  skin  area  * 

time  (eqn  A.1) 

where  AES(i)  *  mg  /  sq  cm  -  sec 

skin  area  =  sq  cm 
time  =  sec 

Note  that  this  assumes  a  constant  absorption  rate  over  time 
regardless  cf  the  a  mount  of  agent  deposition  or  previous 
dose  absorbed. 

t.  There  exists  DCS  (j)  *  rate  at  which  a  soldier  can 
decontaminate  skin  contaminated  with  agent  j  such  that 

Skin  area  contaminated  =  DCR(j)  *  initial  deposition  on  skin 
*  initial  skin  area  contaminated  *  time  (eqn  A. 2) 

where  DCR  ( j)  =  sq  cm  /  mg  -  sec 

deposition  =  mg  /  sq  cm 
area  =  sq  cm 
time  -  sec 

Since  we  assume  uniform  deposition  on  the  soldier,  the 
concentration  will  be  the  same  over  the  entire  contaminated 
skin  area  at  any  given  time. 


c.  Decontaminated  skin  is  immediately  covered,  sc  no 
recor.tamination  occurs. 

d.  Decontamination  will  not  occur  while  there  is 
significant  liquid  depositing  itself  on  the  body  -  the 
soldier  will  seek  or  improvise  overhead  cover.  As  a  result, 
there  is  no  increase  in  the  skin  concentration  after  decon¬ 
tamination  has  commenced.  Condensation  of  vapor  and 
settling  of  aerosols  ont  exposed  skin  during  the  time  of 
emergency  skin  decontamination  is  negligible. 

e.  ABS  (j)  and  DC?,  (j)  may  vary  among  soldiers  and 
among  agents,  but  they  are  constant  for  a  given  soldier  - 
agent  combination. 

2.  Derivation 

At  time  t,,  ,  when  decontamination  commences,  the 
soldier  has  a  given  concentration  (deposition)  on  a  given 
amount  of  exposed  skin. 

Let  C  o  *  Concentration  on  skin  in  mg 
let  S  =  exDosed  skin  surface  in  cm 

O  *- 

Before  decontamination,  the  concentration  on  the 

skin  was 


C  =  deposition  rate  *  skin  area  *  time 
skin  area  *  time 

or 


ABS(j)  * 
(egn  A. 3) 


C 


(deposition  rate  -  absorption  rate)  *  skin  area  * 
time  (egn  A. 4) 


At  t  ,  the  deposition  rate  is  negligible  (by  assump¬ 
tion)  .  After  decontamination  commences,  the  skin 
concentration  is  no  longer  uniform. 


The  dose  absorbed  over  any  small  interval  t* 
S(t)  *  ABS(j)  *  t*  if  C(t)  >  ABS  ( j)  *  t» 
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is 

(egn  A. 5) 


S  (t)  *  ABS(  j)  at 
'to 


if  C  (t  o)  >  ABS(j)  *  (t-to) 

(can  A. 6) 

T’n€  dose  D  absorbed  between  to  and  some  later  time  t 
is: 

D  =  ABS(j)  *  ^(So-  ECS(j)  *'Co  *  t)  dt  =  ABS  (j)  *  {(S0*  t  - 
(DCE(j)  ♦Vo  *  t  /2)  }  fJdP°int  (6gn  ft  .7) 

The  endpoint  is  t  if  t  <=  S0/DCR(j)  *  C0  since  at 
the  end  of  t  =So/DCR(j)  *  Coall  skin  is  decontaminated;  the 
endpoint  is  So/DCR(j)  *  Co  if  t  >  5o/DC3(j)  *  C3 .  The  dose 

absorbed  is  then  then  the  minimum  of  D  as  evaluated,  or  the 
naxiaua  amount  that  was  present  to  be  absorbed.  l:t  t •  = 

(t  -  to  )  . 

If  t'  is  less  than  or  equal  to  So  /  DCR(j)  *  Co : 

D  =  AES  ( j)  *  t'  *  (  So-  (DCR(j)  *  Co  *  (t»/2))  ]  (eqn  A. 8) 

If  t'  is  greater  than  So  /  DCE  (j)  *  CQ  : 

D  =  AES  ( j)  *  [  So2  /  (DCS  ( j )  *  Co*  2)  ]  (eqn  A. 9) 

If  C  o  is  less  than  or  equal  to  ABS(j)  *  (t  -tQ)  : 

D  =  C0  (eqn  A.  10) 


Therefore,  the  dose  is: 

D  =  min  [  result  from  integration,  C0  ]  (eqn  A.  11) 


B.  DOSAGE  COMPUTATION  UNDER  NOHHAL  CIRCUMSTANCES 
1  •  Inhalation  Dose 

The  inhalation  dose  is  that  dose  received  from  chem¬ 
ical  agent  aerosols,  vapors,  ana  suspended  droplets  in  the 
air  that  are  absorbed  into  the  bloodstream  via  the 
respiratory  tract.  There  are  two  ways  in  which  an 
inhalation  dose  may  be  received: 

a.  Dosage  Received  Prior  to  Donning  a  Protective 
Mask 

Let  AGA .INHAL.  FACTOR  be  a  conversion  factor 
representing  the  milligrams  of  agent  inhaled  into  the 
respiratory  tract  that  are  absorbed  into  the  bloodstream. 
Units:  mg  into  bloodstream  /  mg  imhaled  (dimensionless) 

Let  SW.  BREATHING  be  the  breathing  rate  of  the 
individual,  as  a  function  of  the  mission  and  work  rate 
(expressed  in  terms  of  V EH.  SYS. TYPE,  VEH.  NPN .  TYPE,  and 
DEFNUM)  . 

Units:  cubic  meters  /  sec 

Let  DEP  (2)  be  the  average  concentration  of 
agent  in  the  air  during  the  time  interval  of  interest. 

Units:  mg  /  cubic  meter 

Let  T.  START  be  the  beginning  of  the  interval  and 
T.END  be  the  end  of  the  interval. 

Then  the  total  inhalation  dose  (INHALE.  DOSE)  is: 

INHALE.  DOSE  =  A G.  IN H AL.  FACTOR  *  DEP  (2)  *  SW.  BREATHING  * 

(T.END  -  T.  START)  (egn  A.  12) 
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t.  Dosage  Received  Through  a  Leak  in  the  Protective 
Ma  s  k . 

If  the  MASK! EAK  is  the  percentage  of  the  outside 
concentration  entering  the  mask  due  to  a  leak,  then  the 
total  inhalation  dosage  INHALE. DOSE  received  will  be: 

INHALE.  DCSE  =  MASKIEAK  *  AG.  INHAL.  FACTOR  *  D2P(2)  * 

SW.  BREATHING  *  (T.  END  -  T. START)  (ear.  A.  13) 


2  •  Percutan  sou  s  Cos  e 

The  percutaneous  dose  is  that  dose  received  from 
liquid  chemical  agents  that  contact  the  skin  and  are 
absorbed  into  the  bloodstream. 

a.  Percutaneous  Dose  Received 

Let  PFA.CHEM(i)  be  the  protection  factor  of  any 
clothing  or  gear  covering  the  skin  of  body  area  i. 
PFA.CHEN(i)  =  1  if  the  skin  of  body  area  i  is  exposed. 

Units:  mg  contacting  the  skin  /  mg  contacting  the  outer 

layer  of  protection  (dimensionless) 

Let  ABS(j)  be  the  rate  of  absorbtion  of  chemical 
agent  (j)  through  the  skin. 

Units:  mg  /  (sg  cm  skin  sur  face)  *  (second) 

Let  DE P  ( 1 )  be  the  average  deposition  of  chemical 
agent  on  the  protective  clothing  (or  skin,  if  exposed) 
during  the  interval  cf  interest. 

Units:  mg  /  sq  cm 

Let  SKIN  (i)  be  the  surface  area  of  the  skin  of 

body  area  i. 

Units:  sq  cm 

Let  T.  START  be  the  beginninq  of  the  interval  and 
T.  END  be  the  end  of  the  interval. 


Then  the  total  percutaneous  dose  (SKIN.  DOSE) 


SKIN.  COSE  =  PFA.CHEM(i)  *  ABS  { j)  *  DEP(1) 
♦  (T.BND  -  T.  ST  AST) 


*  SKIN  (i) 
(egn  A.  14) 


C.  CCSPOTER  RODTINES  OSED  TO  COHPOTE  DOSAGE 

1 .  The  Routine  COSE. CO  MPUTS 

This  routine  was  used  to  contain  the  dosage  formulas 
stated  in  Appendix  A.  It  can  be  called  from  the  routine 
DOSE  1 . 


2 .  The  Routine  DCSE3. COMPUTE 


=:cc  -p  t 
areas  5 


This  routine  is 
that  it  only  asse 
,  6 ,  and  7.  It  i 


identical  to 
sses  the  parent 
s  called  by  the 


DOSE. COMPOTE  (above), 

ar.ecus  dose  over  body 
routine  DOSE3 . 


3.  The  Routine  CECON.  DOSE 


dc  sage 


This  routine  contains  the  formulas 
received  while  decontaminating. 


for  computing  the 


Appendix  A. 


CODE 


1  ROUTINE  CECON. CCSE  GIVEN  ARE  i , AGENT , T. DECON. D ,  AND 
PRINT  1  LINE  THUS 


DEP  YIELDING  DOSE 


ROUTINE  DECCN.DCSE  CALLED 


3 

4 

5 

6 

7 

8 
9 

10 
1 1 
12 

13 

14 

15 

16 

17 

18 
19 


DEFINE  AREA  AND  AGENT  AS  0-DIME NSIONAL,  INTEGER  VARIABLES 

DEFINE  T.CECCN.E.  E N C?T  AND  CO  AS  0- DIM EN SION A L,  REAL  VARIABLES 

DEFINE  DE?  A;  A  1- D I  MENS  ICNA L.  REAL  ARRAY 

DEFINE  DOSE  AS  A  2  -  DIM EN SION AL ,  REAL  ARRAY 

RESERVE  DEP  (*)  AS  N. AGENT 

RESERVE  CCS  £(*,*)  AS  7  BY  N.  AGENT 

let  co  *  dep  (agent)  *  skin(side.area) 

LET  EHDPT  =  SKI  N  (S  ID  E,  A  RE  A)  /  (  DCR (AGENT) *CO  ) 

IF  T.DECCN.C  IS  LE  ENDPT 

LET  DOSE  (AREA, A  GENT)  =■  ABS  (A  GENT)  *  T. DECON. D  * 

(  SKINjSIDE.AREAf  -  (CCRf  A  G  ENTj  *  SKIN  (SIDE  ,  AR  EA)  *T.  DECON.  D*0.  5] 
ELSE  LET  DOSE(AREA,  AGENT)*  ABS  (  AGENT)  *  ENDPT  *  SKIN  (SIDE,  ARE  A)  *  i 

REGARDLESS 


END 


REGARDLEi, 

LET  DOSE  (AREA, AGENT)  =  MIN.F(  CO,  DOSE( AREA, AGENT)  ) 

LET  DOSE  (AREA.AGENI)  *  A  .ANTIDOTE  (AGENT)  *  DOS E  (AREA, AGENT) 
RETURN 

•  *0?  SOUTINE  DECON. DOSE 


CODE 


1  ROUTINE  COSE .  COMPOT  S  GIVEN  T. START.  T.  END.  AGENT  AND  DEP 

2  DEFINE  I. START.  T.  END,  INHALE. DOSE  AND  SKIN. DOSE  AS  0- DI MEN  SIGNAL , 

3  PEAL  VARIABLES 

4  DEFINE  AGENT  AS  A  0 - DI M E NSIO NAL  .  INTEGER  VARIABLE 

5  DEFINE  DEF  AS  A  1- D I  BE  NS ICNA  L,  REAL  VARIABLE 

6  RESERVE  CEP  {♦)  AS  2 

7  PRINT  1  LINE  THUS 

SOUTINE  DOSF.COKf  CALLED 
3  •  • INHALATION  DOSE 

9  LIST  AG. INHAL. FACTOR  (AGENT)  .  DEP(2)  . 

10  SW. BREATHING  ( VEH. SYS.I  YPE  ( SO  LDIER)  ,  v£H. KPN. TYPE (SOLDIER)  , DEFNUfl  (SOLDI ER) )  , 

11  X.END,  T. START 

12  IF  (T.NASK  (SCLOIES)  IS  GE  T.  END) 

13  OS  (T.BASK  (SOLDIER)  =  0)  "PRIOR  TO  BASKING 

14  LET  INHALE. DOSE  =  AG .  INHAL. F ACTOR ( AGENT)  *  DEP (2)  * 

15  SW. BREATHING  < VEH .S Y3 .TYPE (SOLDIER)  ,  VEH.  K  PN.  TYPE  (SOLDIER) .DEFNUH (SOLDIER)) 

1o  ♦  (T.END-T.  START) 

17  ELSE  IF  BASKLEAK  (SOLDIER)  IS  NOT  EQUAL  TO  0  "BASK  ON  BUT  LEAKS 

18  LET  INHALE. COSE  -  AG . INHAL.  7  ACTOR ( AGENT)  *  DEP  (2)  * 

19  SW. BREATHING  (VEH. SYS .TYPE  (SOLDI ER)  , VE H . W PN. T YPE (SOLDIER)  .DEFNUH (SOLDIER) ) 

20  *  (T. END-T. START)  *  BASKLEAK (SOLDIER) 

21  ALWAYS  REGARDLESS 

22  '  •  PERCUT ANECOS  COSE 

23  LET  SKIS. DOSE  *  0 

24  FOR  I  *  1  TO  7,  DO 

25  LET  SKIN. DOSE  =  SKI.V.  DOSE  ♦  FFA.CHEM(I)  »  SK.TN  (SIDE,  I)  * 

26  BI N  .  F  (  ABS(AGENT)*  (T. END-T. START)  ,  DEP(1)  ) 

27  LOOP  '  ' 

28  ••CUBULATIVS  IV  DOSE 

29  LET  INHALE.  DOSE  =  INHALE. DOSE  *  A .  ANTTDOT  E  t  AGENT)  "FIRST  AID 

30  LET  SKIN. DOSE  -  SKIN. DOSE  *  A.  A  NTIDOTE  (AGEliX)  "FIRST  AID 

31  LET  AGA.CUHDOSE  (AGENT)  *  INHALE. DOSE  ♦  SKIN. DOSE  ♦  AGA . CUHDCSZ (AG  ENT) 

32  LIST  INHALE. DOSE,  SKIN. DOSE,  AGA . CO  BOOSE ( AGENT) 

33  RETURN  '  ' 

34  END  "OF  ROUTINE  DOSE.COBEUTE 


CODE 

1 


HOUTINE  DOSE3. COMPUTE  GIVEN  T. START,  T.EHD,  AGENT  AND  DEP 

2  DEFINE  T. START.  T.  END,  INHALE. DOSE  AND  SKIN. DOSE  AS  O-DIHENSICNAL, 

3  REAL  VARIABLES 

4  DEFINE  AGENT  AS  A  0  -  01 M E NSIONA L.  INTEGER  VARIABLE 

5  DEFINE  DEP  AS  A  1- D I  ME N S IONA L,  REAL  VARIABLE 

6  RESERVE  DEP ( ♦)  AS  2  ,  _  „„ 

7  PRINT  2  LINES  WITH  T. START,  T.2ND,  AGENT,  DEP(1)  AND  DEP (2)  THUS 
ROUTINE  DOSE3 . CCBP  CALLED  GIVEN  I. START  =  ***.*,  T. 2ND  =  ***.*, 

AGENT  =  **.  DEP  (11  =  ****.**  AND  DEP(2)  =  ****.** 

• 'INHALATION  DOSE 

IF  (T.  BASK  (SCLDIER)  IS  EQUAL  TO  0)  OR  (T.  BASK  (SOLDIER)  IS  GE  T.  END) 

LET  INHALE. DOSE  =  AG . INHA L.  F ACTOR ( AGENT)  *  DEP  (2f  * 

SW. BREATHING  (VEH. SYS .TYPE  (SOLDI ER)  , V2h. WPN. TYPE  (SOLDIER)  .DEFNUH (SOLDI ER) ) 

*  (T. END -I. SI ART) 

ELSE  IP  BASKLEAK  (SOLDIER)  IS  NOT  EQUAL  TO  0 

LET  INHALE. DOSE  =  AG . INHAL. F ACTOR f AGENT)  *  DEP  (2)  * 

SW. BREATHING (VEH. SYS. TYPE  (SOLDI ER)  . VEH.  KPN.  TYPE (SOLDIER 

♦  (T. END-I. START)  *  BASKLEAK  (SOLDIER) 


8 

9 

10 
1 1 
12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 


:EH) .DEFNUH (SOLDIER) ) 


ALWAYS  REGARDLESS 
•  1  P ERCUT A iiEOC S  DOSE 
LET  SKIN. COSE  »  0 


FOR  I  >  5  TO  7,  DO 

LET  SKIN.  CCS  E  *  SKIN.  DOSE  PFA.CHEH(I)  *  SKIN  (SIDE, I)  * 

BIN  .F  (  ABS  (AGENT)  *  (T.END-T. START)  ,  DEP(1)  ) 

LOOP 

• ‘CUMULATIVE  IV  DOSE 

LET  AGA. CUBDOSE  (AGENT)  »  INHALE . DOSE  ♦  SKIN. DOSE  ♦  AG A. CUMDCSE ( AG  ENT) 
LIST  INHALE. DOSE,  SKIN. DOSE,  AGA. CU HDOSE (AGENT) 

RETURN 

END  "OF  ROUTINE  COS E 3. CO HPUTE 


145 


APPENDIX  | 

GLOSSARY 

A.  CONVENTIONS  USED  IN  NAMING  V AGIABLES 

Several  conventions  were  followed  in  deriving  variable 
names  used  in  this  model.  An  understanding  of  these  conven¬ 
tions  will  assist  in  the  understanding  of  the  routines  found 
in  this  thesis.  They  are: 

1.  A  used  as  a  prefix  (e .  g.  ,A.  ROUND)  ,  or  found  at  the  end 
of  a  prefix  (e.g. ,  ?  A.  PF.  CHBM)  indicares  an  array. 
Normally  this  array  will  have  an  attribute  pointer. 

2.  AG  used  as  a  prefix  refers  to  tne  agents.  If  the  array 
is  singly-  dimensioned,  the  dimension  will  be  N.  AGENT. 
If  it  has  two  dimensions,  the  last  dimension  will  be 
N.  AGENT. 

3.  AL  as  a  prefix  refers  to  attributes  or  characteristics 
of  alarm  systems. 

4.  D  as  a  prefix  refers  to  an  array  that  holds  a  prob¬ 
ability  distribution,  or  in  the  case  of  D.  IMP.AIB  and 
D. INCAP  only,  are  used  to  generate  numbers  from  a 
probability  distribution.  Other  than  the  two  excep¬ 
tions  mentioned  above,  the  last  dimension  of  the  array 
is  three;  the  first  value  in  that  dimension  is  the 
distribution  type;  the  ether  two  are  the  parameters  of 
the  distributi cn. 

5.  DEE  as  a  prefix  refers  to  the  deposition  or  air 
concentration  cf  the  agents.  The  attributes  DEP. AI3 
and  DEP.  GND  point  to  these  N.  AGENT  dimensioned  arrays. 

6.  DT  as  a  prefix  indicates  arrays  that  hold  probability 
distributions  for  times  taken  to  perform  actions.  The 
last  dimension  is  of  size  three,  with  the  same  values 
as  are  given  fer  the  "D"  prefix  above. 
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N  as  a 


US  9 


prefix  indicates  global  variables 
indicate  the  number  of  entities  or  critical 
tc  be  modelled.  These  values  are  used 
statements  and  CO  LOOPS. 


parameters 
in  DEFOE 


3  . 


OLD  as  a  prefix  indicates  a  value  tha^  has  been 
retained  from  the  previous  iteration. 

PC  as  a  prefix  stands  for  Probability  (Chemical).  It 
was  used  in  lieu  of  a  simpler  "P"  prefix  tc  avoid 
problems  with  SIMSCRIPT  generated  arrays.  These  vari¬ 
ables  hold  probabilities;  they  are  used  to  direct  the 
actions  that  will  be  taken  by  ail  PERSONS  modelled. 

PF  as  a  prefix  stands  for  Protection  Factor.  The 


arrays  indicate  values  relating  tc  the  protection 


factor  afforded  each  of  seven  body  areas,  and  their 


last  dimension  is  of  size  seven. 

T  as  a  prefix  is  used  for  times.  dhen  used  as  tempo¬ 
rary  attributes,  they  indicate  either  the  time  that  a 
(dimensionless)  event  occurred*  such  as  detection,  or 
the  time  tnat  ar.  action  was  completed. 

TA  as  a  prefix  refers  to  the  arrays  that  held  time 
values. 


VSH  as  a  prefix  refers  to  attributes  or 
characteristics  cf  vehicles. 

The  ”D"  suffix  is  used  to  refer  to  the  time  that  it 
actually  took  to  perform  an  action  (e.g. ,  T .  NAA.  D 
refers  to  the  time  it  takes  to  inject  an  antidote).  It 
originally  stood  for  "don",  the  time  required  tc  don 
the  mask  cr  protective  gear,  but  for  conformity  it  has 
been  used  with  all  performance  times. 


3.  VARIABLE  DEFINITIONS 


A. ANTIDOTE  GLOBAL  VARIABLE  (1-D)  REAL 


This  variable  is  used  to  reduce  the  dosaae  for 
each  agent  by  multiplying  the  accumulated  dosage 
by  the  appropriate  array  element.  It  is  initial- 
ized  at  i  in  the  main  (driver)  proaram  when  the 
arrav  is  created.  The  pointer  to  the  array  is 
stored  in  the  attribute  ANTIDOTE.  Currently,  only 
the  array  elements  corresponding  to  the  nerve 
agents  are  modified  -  they  are  set  egual  tc  the 
value  found  in  NA  A.  FACTOR  by  the  routine  NAA 

Dimensions:  N.  AGENT 

Value:  NAA. FACTOR  for  nerve  agents;  a  suitable 

reduction  factor  for  other  agents. 


A.  ROUND  GLOBAL  VARIA3LE  (2-D)  REAL 


This  arrav  forms  a  queue  in  which  are  stored  the 
time  and  cheaical/ncnchemical  nature  of  each  round 
landing  sufficiently  near  to  the  PERSON  durir.c 
DiLT  to  cause  the  PERSON  to  react  (he  was  in  the 
effects  ellipse  of  the  round)  .  Tha  ooir.ter  tc  the 
array  is  stored  in  the  attribute  ROUND.  Each  time 
a  round  impacts  and  the  PERSON  is  placed  in  the 
set  corresponding  to  all  personnel  affected,  the 
round  time  and  nature  should  be  added  tc  the 

queue.  The  queue  length  at  any  time  is  stored  in 

the  attribute  RDPTR. 

Dimensions :  (A  number  large  enough  to  accomodate 
all  rounds  landing  close  enough  to  affect  the 
PERSON)  by  2 

Value : 

1st  dime nsgcn:  The  time  that  the  round  impacted. 

2nd  dimension: 

0  -  if  the  round  is  not  chemical 

1  -  if  the  round  is  chemical 


ABS  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  stores  the  absorption  rate  of  each 
agent  through  exDosed  skin.  It  is  used  to  convert 
the  deposticn  oh  the  sum  in  mg/sg.cm.  to  the 
intravenous  dose  in  mg. 

Units  :  mg/sg.cm  -  sec 

Dimension:  N. AGENT 

Value:  As  given  above. 


AG. AL. THRESH  GLOBAL  VARIABLE  (2-D)  REAL 


This  variable  provides  the  concentration  of  each 
agent  in  mg/m  that  will  cause  a  chemical  agent 
alarm  to  sound  a  warning. 
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Dimensions:  N.  SIDE  by  N.  AGENT 
Value:  As  given  above,  for  each  side. 


AG .COM  DOSE  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  serves  as  a  pointer  to  AGA.CUMDOSE, 
which  holds  the  accumulated  dosage  for  each  agent. 


AG.  DECAY  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  provides  the  amount  of  decay  of  each 
agent  due  to  weathering  that  can  be  expected  t 
occur  in  the  interval  DELI.  It  is  multiplied  b 
the  deposition  DSP.G.OLD  at  the  beginning  of  th 
interval  to  yield  the  value  at  the  end  of  th 
interval. 

Dimensions:  N.  AGENT 

Value:  As  given  above,  for  each  agent. 


AG.  DECCN.  DOSE  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  serves  as  a  pointer  to  the  array 
AGA.  DECON.  DOSE,  which  stores  the  averaae  dosage 
received  during  each  interval  DELT  during  the 
decontamination  process 

AG. IMP  AIR  '  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  serves  as  a  oointsr  to  the  array 
AGA.  IMPAIR,  which  gives  the  dosage  threshold  of 
the  PERSON  for  impairment. 


AG. INCAP  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  serves  as  a  pointer  to  the  array 
AGA.  INCAP,  which  gives  the  dosage  threshold  of  the 
PERSON  for  incapacitation. 


AG. INHAL. FACTOR  GLOBAL  V  ART  ABLE  (  1-D)  REAL 


This  array  stores  the  conversion  factor  used  to 
convert  the  mg.  of  agent  inhaled  into  the  lungs 
into  an  equivalent  intravenous  dose. 

Units:  Dimensionless 

Dimension:  N. AGENT 

Value:  As  given  above,  for  each  agent. 
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AG. LET H 


TEMP.  A  TTSIBUTE 


INTEGER 


This  attribute  serves  as  a  pointer  to  the  atrav 
AGA.  LETH,  which  gives  the  lethal  dosage  threshold 
or  the  PERSON. 


AG. PICKUP  GLOBAL  VARIABLE  (1-D)  PEAL 


This  array  serves  as  a  conversion  factor  to 
convert  the  deposition  on  the  ground  DEF.G.CU5R  in 
a  contaminated'  area  to  the  deposition  that  would 
be  found  on  the  surface  of  personnel  and  vehicles 
crossing  that  area  -  thus,  it  represents  the 
percentage  of  the  acent  picked  up  ir.  traversina  a 
contaminated  area. 

Dimension:  N. AGENT 

Value:  As  given  above,  for  each  agent 


AGA.  CUM  DOSE  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  holds  the  accumulated  intravenous  (17) 
dosage  for  each  agent.  It  is  incremented  ir.  the 
DCSE 1 ,  DOSE2,  and  D0SS3  routines. 

Dimension:  N.  AGENT 

Value:  The  dosaoe  in  mg  accumulated  up  to  the 

current  time 


AGA.  CECCN.  DOSE  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  holds  the  average  dosage  for  each 
agent,  in  rag.  that  the  PERSON  will  receive  iurtr.g 
each  DELT  interval  while  he  is  performing  deconta¬ 
mination.  It  is  used  to  increment  the  accumulated 
dosage  array  AGA . CUMDOSE  for  every  DELT  interval 
during  which  the  PERSON  is  performing  decontamina¬ 
tion.  The  DECON2  routine  will  compute  this  value. 

Dimension:  N. AGENT 

Value:  A  dgsage  in  ma,  which  is  the  total  dose 

received  during  decontamination  divided  by  the 
number  of  DELT  intervals  it  takes  to  perform 
the  decontamination. 


AGA. IMPAIR  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  holds  the  impairment  dose  threshold 
values  for  each  agent.  This  array  is  created  when 
the  PERSON  is  created  by  multiplying  D.  IMPAIR 
times  the  lethal  dose  threshold  values  created 
through  a  draw  from  D.  LETH. 

Dimension:  N. AGENT 

Value:  As  given  above,  for  each  agent 


AGA.  INCAP 


GLOBAL  VARIABLE  (1-D) 


REAL 


This  array  holds  the  incapacitation  dose  threshold 
values  for  each  agent.  This  array  is  created  wher. 
the  PERSON  is  created  by  multiplying  D. INCAP  times 
the  lethal  dose  threshold  values  created  througn  a 
draw  from  E.LETH. 

Dimension:  N. AGENT 

Value:  As  given  above,  for  each  agent 


AGA.LETH  GLOBAL  V  ARIAELE  (1-D)  REAL 


This  array  holds  the  lethal  dose  threshold  values 
for  each  agent.  This  array  is  created  when  the. 
PERSON  is  created  by  randoalv  drawing  from  the 
distribution  found  in  the  array  D.LSTH. 

Dimension:  N. AGENT 

value:  As  given  above,  for  each  agent 


AGENT.  TYPE 


GLOBAL  VARIABLE  (1-D) 


INT  EG  ER 


This  array  is  used  to  store  an  inteoer  used  to 
identify  the  type  of  agent.  Ail  nerve  agents 
should  be  given  a  value  of  1;  other  oosit ive  inte¬ 
gers  can  be  used  to  denote  other  types  of  agent. 
1^  is  used  to  check  the  type  cf  agent  when  the 
nerve  agent  antidote  is  injected;  if  the  agent 
type  is  nerve,  the  dosage  will  be  reduced  by 
Naa. FACTOR;  if  the  type  is  not  nerve,  then  no 
dosage  reduction  will  be  applied. 

Dimension:  N. AGENT 

Value: 

1  -  For  nerve  agents 


AL.MAX.DIST  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  holds  the  maximum  distance  from  a 
PERSON  to  another  PERSON  or  ALARM  over  which  he 
would  hear  the  alarm  or  notice  the  reaction  of 
that  other  FERSON  to  a  chemical  hazard.  Any  PERSON 
cr  ALARM  that  has  previously  detected  the  presence 
of  a  chemical  hazard  will  warn  ail  other  PERSONS 
within  this  distance  of  his  position 

Dimension:  N.SIDE 

Value:  Derived  from  normal  line-cf-sight  condi¬ 

tions  and  the  expected  distance  that  one  could 
hear  the  standard  alarm 
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ALARM 


TEMP.  ENTITY 


This  entity  represents  the  standard  automatic 
alarm  or  detection  device  that,  when  it  detects 
the  presence  of  a  chemical  agent,  will  sound  an 
alarm  (or  otherwise  notify  nearby  personnel)  .  It 
should  be  created  in  appropriate  numbers  when 
vehicles  and  units  are  created.  It  has  3  attri¬ 
butes:  WARNING,  X. ALARM,  and  Y. ALARM. 


ALPTF  GLOBAL  VARIABLE  (1-D) 


This  array  is  used  tc  store  the  pointer  tc  the 
memory  location  where  the  temporary  entity  ALARM 
and  its  attributes  are  stored. 


ANTICOTE  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  serves  as  a  pointer  to  the  arrav 
A.  ANTIDOTE,  which  stores  the  factors  by  which 
dcsage  of  each  agent  will  be  reduced  due  tc  a 
first  aid  treatment 


CHANGE. ORDER  GLOBAL  VARIABLE  (2-D)  REAL 


This  array  is  used  to  order  changes  in  chemical 
protection  external  to  the  effects  model.  The 
array  can  be  accessed  by  any  routine  cy  the  name 
of  each  PERSON,  and  the  changes  in  protection  are 
ordered  by  changinq  the  array  values  (they  are 
initialized  at  -1  By  the  driver  program).  After 
changes  have  been  made,  they  will  be  implemented 
the  next  time  that  CHEM. CHECK  is  called. 

Dimensions:  N.  PERSON  by  10 

V  3  Ill  0  * 

1st  dimension:  The  name  of  the  PERSON 
2nd  dimension: 

1  -  Enter  1  if  you  want  the  PERSON  tc  mask 

2  -  Enter  the  value  of  the  new  CP  category  if 

ycu  want  the  PERSON  to  change  his  collec¬ 
tive  protection  (values  1-5) 

3  -  Enter  1  if  vou  want  the  PERSON  tc  create 

temporary  overhead  cover 

4  -  Enter  the  value  of  the  protection  factor 

for  a  new  item  of  clothing  or  gear  to  be 

?ut  on  over  body  area  1 
ame  as  above  for  body  area  2 
6  -  Same  as  above  for  body  area  3 

7  -  Same  as  above  for  body  area  4 

8  -  Same  as  above  for  body  area  5 

9  -  Same  as  above  for  body  area  6 

10  -  Same  as  above  for  body  area  7 


CHEM. CHANGE  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  stores  the  pointer  to  the  array 
CHANGE. ORDER,  which  is  used  to  order  changes  in 
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chemical  crot ect  ion  external  to  the  chemical 
effects  model. 


CHEMDET  TEMP,  A TTRI3UTS  INTEGER 


This  attribute  shows  if  the  PERSON  has  detects! 
the  presence  of  a  persistent  chemical  agent  hazard 
as  of  the  previous  iteration  of  CHEM. CHECK.  A 
detection  in  the  current  DSLT  iterval  will  cause  a 
change  in  this  attribute  at  the  beginning  of  the 
iteration  fcr  the  following  DELT  interval. 

Values:. 

0  -  indicates  no  detection 
1  -  indicates  detection 


CHEM SIT  GLOBAL  VARIABLE  INTEGER 


This  variable  indicates  the  current  situation 
facing  the  PERSON  during  this  iteration.  The  value 
is  determined  by  CHEM. CHECK  at  the  beginning  of 
the  iteration  over  this  PERSON. 

Values  : 

0  -  The  PERSON  is  stationary  and  has  not  been 
directly  attacked  by  (in  the  immediate  effects 
ellipse  cf)  a  chemical  agent  munition 

1  -  The  PERSON  is  in  the  immediate  effects  ellipse 

of  a  chemical  agent  munition.  He  may  ‘be 
stationary  or  moving 

2  -  The  PERSON  is  me  vino  in  an  area  of  previously 

deposited  contamination.  There  is  no  airborne 
agent  present 

3  -  The  PERSON  is  moving  in  an  are?,  where  ther°  is 

still  agent  in  the  air  (it  has  not  all  depos¬ 
ited  on  the  ground) ,  and  has  not  been  directly 
attacked  by  a  chemical  munition 


COLOR 


TEMP.  ATTRIBUTE  INTEGER 


Ar.  attribute  used  in  STAR,  this  indicates  the  side 
tc  which  the  entity  belongs. 

Values:  Any  nonnegative  integer 
CONTAMINATED  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  indicates  if  there  is  contamination 
over  the  entire  surface  of  the  PERSON  cr  his 
collective  protection 

Values: 

0  -  No  contamination  over  all  surfaces 
1  -  Contamination  present  on  all  surfaces 
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CP 


TEMP.  ATTRIBUTE 


INTEGER 


This  attribute  indicates  the  current  level  of 
collective  protection  afforded  the  PERSON 

Values : 

1  -  A  vehicle  w:-.h  an  operating  overpressure 

system 

2  -  A  vehicle  without  an  overpressure  svs^em 

3  -  A  bunker  or  building 

4  -  A  foxhole,  with  or  without  temporary  overhead 

cover 

5  -  No  protection  (the  PERSON  is  in  the  open) 


CREW  SET  (1-D) 


This  set  is  created  for  each  vehicle.  Filed  in  the 
set  are  the  PERSONS  that  form  the  crew  of  the 
vehicle 


D. IMPAIR  GLOBAL  VARIA3LE  (1-D)  REAL 


This  array  is  used  to  determine  the  impairment 
threshold  acse  for  the  PERSON.  It  represents  the 
fraction  of  the  lethal  dose  for  each  agent  that 
would  cause  impairment.  The  thresholds  are 

created  by  multiplying  this  array  by  the  lethal 
dcse  thresholds  stored  in  the  array  AGA.LETH. 

Dimension:  N. AGENT 

Value:  Any  fraction  between  0  and  i 


C. INCA F  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  is  used  to  determine  the  incapacitation 
threshold  dcse  for  the  PERSON.  It  represents  the 
fraction  of  the  lethal  dose  for  each'  agent  that 
would  cause  incapacitation.  The  thresholds  are 
created  by  multiplying  this  array  by  the  lethal 
dcse  thresholds  stored  in  the  array  AGA.LETH. 

Dimension:  N. AGENT 

Value:  Any  fraction  between  0  and  1 


E.LETH  GLOBAL  VARIABLE  (2-D)  REAL 


This  array  is  a  distribution  used  to  determine  the 
lethal  threshold  .dose  for  the  PERSON.  A  random 
draw  from  the  distribution  for  each  agent  will 
establish  the  lethal  dose  of  that  agent  for  the 
PERSON 

Dimensions:  N.  AGENT  by  3 


Values: 

1  -  The  type  of  distribution  (see  DISTRIB,  below) 

2  -  The  first  parameter  of  the  distribution 
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-  The  second  parameter  of  the  distributer. ,  if 
any.  The  value  can  be  left  at  0  (the  initial 
value  when  the  array  was  reserved)  if  there  is 
no  second  parameter 


D.MSKLEAK  GLOBAL  VARIABLE  (2-D)  REAL 


This  array  provides  the  probability  distribution 
for  the  leakaae  of  the  protective  mask.  The  vari¬ 
able  MASKLEAK,  the  percentage  of  leakage  of  the 
mask  to  vapors,  is  drawn  from  it  using  the  func¬ 
tion  DISTRIE 

Dimensions:  N.SIDE  by  3 

V  A  lii  a  e  » 

1  -  The  distribution  type 

2  -  The  first  parameter  of  the  distribution 

3  -  The  second  parameter  of  the  distribution 


D. PF .LEAK  GLOBAL  VARIABLE  (2-D)  REAL 


This  array  provides  the  probability  distribution  * 
for  determinir.a  the  amount  of  leakaae  *0  iicuid 
acents  found  in  the  items  of  protective  clothing 
that  cover  the  seven  body  areas.  The  array 
elements  PF  A. LEAK  are  drawn  from  the  distribution. 


Dimensions:  7  (the  number  of  body  areas)  by  3 


Values : 

1  -  The  distribution  type 

2  -  The  first  parameter  of  the 

3  -  The  second  parameter  of  th 


distribution 
a  distribution 


DEFNUM  TEMP.  ATTRIBUTE 


1ST  EGER 


This  attribute  gives  the  relative  defilade  of  the 
PERSON  at  any  given  time 


Values : 

1  -  m  a  foxhole 

2  -  prone 

3  -  crawling 

4  -  kneeling  or  sitting 

5  -  standing 


CELT 


GLOBAL  V  ARI ABLE 


REAL 


The  variable  DELT  is  a  user-supplied  parameter 
that  gives  the  time  interval  between  iterations  of 
CHEM. CHECK.  It  is  recommended  that  this  interval 
be  on  the  order  of  10  seconds  in  length 


DEP.A.CURR  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  holds  the  current  values  for  the 
-a--,  concentration  of  agent  (s)  in  the  air  (at  a  height 
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of  2  inters)  at  the  location  of  the  PERSON .  This 
information  is  supplied  by  NUSSE  II  or  some  ecru iv- 
alent  model. 

Units:  mg  /  cubic  meter 

Dimension:  N. AGENT 

Values:  As  given  above  for  each  agent 


DEP.A.OLD  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  holds  the  most  recent  values  for  the 
concentration  of  aaent(s)  in  the  air  (at  a  height 
of  2  meters)  at  the  location  of  the  PERSON.  This 
information  was  obtained  durinq  the  last  iteration 
of  the  model. 

Units:  mg  /  cubic  meter 

Dimension:  N. AGENT 

Values:  As  given  abeve  for  each  agent 


CEP. AIR  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  serves  as  a  pointer  to  the  array 
DSP.  A.CURR,  which  stores  the  current  agent  concen¬ 
tration  in  the  air. 


CEF.G.CURR  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  holds  the  current  values  for  the  depo¬ 
sition  on  the  ground  at  the  location  of  the 
PERSON.  These  values  are  supplied  ny  NUSSE  II  or 
seme  equivalent  model 
Units:  mg/  sq.  cm 

Dimension:  N. AGENT 

Values:  As  given  above  for  each  agent 


CEP. G. OLD  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  holds  the  most  recent  values  for  the 
deposition  on  the  ground  at  the  location  of  the 
PERSON.  This  information  was  obtained  during  the 
last  iteration  of  the  model. 

Units:  mg/  sg.  cm 

Dimension:  N. AGENT 

Values:  As  given  above  for  each  agent 


CEF.GND  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  serves  as  a  pointer  to  the  array 
DEP.  G.CURR.  which  stores  the  current  values  for 
the  deposition  on  the  ground. 
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DEP.RED 


GLOBAL  VARIABLE  (3-D) 


REAL 


This  array  provides  the  conversion  factor  to 
convert  the  deposition  of  liauid  ag-nt.  or  the 
concentration  of  airborne  agent  outside  cf  the 
PERSON'S  collective  protection  to  the  effective 
concentration  inside'  the  protection  or  on  thp 
PERSON.  It  is  multiplied  by  DEP.A.  CURR  (The  first 
element  in  the  last  dimension)  and  by  DEP.G.CURR 
(The  second  element)  to  yield  the  effective 
concn tra tions  and  depositions  inside  the  collec¬ 
tive  protection,  respectively.  It  is  used  only 
for  CP  categories  3,  4  and  5.  (CP  categories  1  and 
2  are  represented  by  SW. BREATHING)  . 

Dimensions:  N.  AGENT  by  3  by  2 

Value?  : 

1st  dimension:  The  indices  represent  the  various 
agents 

2nd  dimension:  The  indicices  indicate  the  three 
non- vehicular  degrees  of  collective  protec¬ 
tion.  They  are: 

1  -  Bunker  or  building  (CP=3)  or  foxhole 

(CP=4)  with  temporary  overhead  cover 
jT.OHC  net  equal  to  zero) 

2  -  Foxhole  with  no  overhead  cover 

3  -  Ir.  the  open  (CP=5)  with  temporary  over¬ 

head  cover 
3rd  dimension: 

1  -  The  fraction  used  to  convert  the  air 

ccncentr  c  ^ 

2  -  The  fraction*  used  to  convert  the  ground 

deposition 


DISTHIB  BEAL  FUNCTION 


The  function  distrib  accepts  a  pointer  to  the  last 
dimension  cf  the  probability  distributions  used  in 
the  model.  It  will  then  draw  a  random  number  from 
any  one  of  6  specified  distributions. 

V  St 3.U  GS  * 

1st  parameter:  The  type  of  distribution  desired. 

1  -  Deterministic 

2nd  parameter:  The  value  desired 
3rd  parameter:  Not  applicable 

2  -  uniform 

2nd  parameter:  The  beginning  of  the  interval 
3rd  parameter:  The  and  of  the  interval 

3  -  Normal 

2nd  parameter:  The  mean 

3rd  parameter:  The  standard  deviation 

4  -  Lognormal 

2nd  parameter:  The  mean 

3rd  parameter:  The  standard  deviation 

5  -  Exponential 

2nd  parameter:  The  mean 

3rd  parameter:  Not  applicable 

6  -  Beta 

2nd  parameter:  The  power  of  x 
3rd  parameter:  The  power  of  (1-x) 
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CT. DECCN 


GLOBAL  VARIABLE  (4-D) 


REAL 


This  array  provides  a  probability  distribution 
from  which  the  time  it  takes  for  emergency  imme¬ 
diate  decontamination  of  skin  or  clothing  for  each 
body  $rea  is  drawn.  This  time  does  not  include 
the  time  required  to  don  protetive  clothing  after 
decontamination. 

Dimensions:  N.  SIDE  by  N. AGENT  by  7  body  areas  by  3 
Values  : 

1st  dimension:  The  side  of  the  PERSON 
2nd  dimension:  The  agent  concerned  (in  multiple 
agent  situations,  a  factor  MULT.  AG.  DECON  will 
provide  a  way  of  adjusting  the  overall  decon¬ 
tamination  time) 

3rd  dimension:  The  body  area  concerned  (1  through 
71 

4th  dimension: 

1  -  The  distribution  type 

2  -  The  first  parameter'of  the  distribution 

3  -  The  second  parameter  of  the  distribution 


CT. DETECT  GLOBAL  VARIABLE  (5-D)  REAL 


This  array  contains  the  probability  distribution 
that  is  used  to  determine  the  glimpse  probability 
of  detection,  PT .  CHEMDET,  of  a  persistent  chemical 
agent  hazard,  based  on  noticing  physical  sians , 
during  the  interval  DELT.  If  PT. CHEMDET  is  greater 
than  or  equal  to  a  uniform  (0,1)  random  number, 
detection  will  have  occurred  during  DELT.  Because 
the  variable  PT. CHEMDET  is  a  probability,  only  a 
uniform  or  deterministic  distribution  (with  param¬ 
eter  (s)  between  0  and  1)  or  a  beta  distribution 
can  be  used. 

Dimensions:  4  by  N.  AGENT  by  5  by  2  by  3 
V  cl  111  6  S  * 

1st  dimension:  The  chemical  situation  CHEMSIT  ♦  1 
(the  +1  is  to  avoid  having  an  index  of  zero) 
2nd  dimension:  The  agent  present 

3rd  dimension:  The  collective  protection  category 
CP  (1  thru  5) 

4th  dimension:  The  value  of  the  attribute  MASK  +  1 
(mask  gff  or  on) 

5th  dimension: 

1  -  The  distribution  type 

2  -  The  first  parameter  of  the  distribution 

3  -  The  second  parameter  of  the  distribution 


DT .  MASK  GLOBAL  VARIABLE  (2-D)  REAL 


This  array  holds  the  probability  distribution  used 
tc  determine  the  time  required  to  don  the  protec¬ 
tive  mask.  The  temporary  T.M.D  is  drawn  from  the 
distribution:  when  added  to  the  current  simulation 
time  T.CHEMCuRR,  this  provides  the  time  at  which 
the  mask  was  dor.ned,  T.  MAS K. 

Dimensions:  N.SIDE  by  3 
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V  3  Xu  05* 

1st  dimension:  The  side  of  the  PERSON 
2nd  dimension: 

1  -  The  distribution  type 

2  -  The  first  parameter  of  the  distribution 

3  -  The  second  parameter  of  the  distribution 


ET.NAA  GLOBAL  VARIABLE  (2-D)  REAL 


This  array  holds  the  probability  distribution  used 
tc  determine  the  time  required  to  inject  the  nerve 
agent  antidote.  The  temporary  variable  T.NAA.D  is 
drawn  from  the  distribution  and,  when  added  to 
T  .CHEMCURR ,  sets  the  time  at  which  the  iniec^icn 
was  complete,  T.NAA 

Dimensions:  N.  SIDE  by  3 


Values: 

1st  dimension:  The  side  of  the  PERSON 
2nd  dimension: 

1  -  The  distribution  type 

2  -  The  first  Darameter  of  the  distribution 

3  -  The  second  parameter  of  the  distribution 


CT.OHC 


GLOBAL  VARIABLE  (3-D)  REAL 


This  array  holds  the  probability  distribution  used 
to  determine  the  time  required  to  reach  cr  create 
overhead  cover.  The  temporary  variable  T.CHC.D 
drawn  from  it  is  added  to  T. CHEMCURR  to  yield  the 
time  that  the  collective  protection  was  reached 
(T .CP)  or  the  time  at  which  the  overhead  cover  was 
completely  ever  the  body  (T.OHC)  . 


Dimensions:  N.SIDE  by  3 


Value?: 

1st  dimension:  The  side  of  the  PERSON 
2nd  dimension: 

1  -  The  distribution  type 

2  -  The  first  parameter  of  the  distribution 

3  -  The  second" parameter  of  the  distribution 


ET.  FF 


GLOBAL  VARIABLE  (4-D)  REAL 


This  array  holds  the  probability  distribution  used 
tc  determine  the  time  required  to  don  a  given  item 
of  chemical  protective  clothing,  for  each  body 
area.  The  temporary  variable  T.PF.D  is  drawn  from 
the  distribution;  when  added  to  T.  CHEMCURR,  this 
yields  the  time  at  which  the  clothing  was  donned, 
TA.PF. CHEM  (i)  for  body  area  i. 


Dimensions:  N.SIDE  by  3 


Value?: 

1st  dimension:  The  side  of  the  PERSON 
2nd  dimension: 

1  -  The  distribution  type 

2  -  The  first  parameter  of  the  distribution 

3  -  The  second  parameter  of  the  distribution 
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ESSENCE 


TEMP .  ATTRIBUTE 


INTEGER 


This  attribute  is  used  to  store  the  pointer  of  the 
entity  UNIT  (not  modelled  in  the  chemical  effects 
model,  but  included  in  the  STAR  iaiDle mentation) 
associated  with  the  entity  PERSON.  *  For  further 
details,  see  Aooendix  D,  Section  2. 


MASK  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  indicates  if  the  PERSON  is  wearina 
the  chemical  protective  mask. 

Value: 

0  -  if  the  mask  is  not  being  worn  (off) 

1  -  if  the  mask  is  being  worn  (or.) 


MASKL2AK  TEMP.  ATTRIBUTE  REAL 


This  attribute  indicates  the  amount  of  leakage  (if 
any)  that  the  mask  will  leak  to  vapors  and  aero¬ 
sols.  It  is  multiplied  by  the  ouside  concentration 
of  acrent  at  the  PERSON'S  location,  DEP.A.CURR,  to 
vield  the  effective  concentration  of  agent  inside 
the  mask.  The  value  is  drawn  from  the  distribu¬ 
tion  D.MSKLEAK 

Values : 

0  -  If  the  mask  does  not  leak 
A  fraction  between  0  and  1  if  the  mask  aces 
leak 


MIN  .  A.  CHS  M  GLOBAL  VARIA3LE  (1-D)  REAL 


This  array  provides  the  minimum  significant  level 
of  air  concentration  for  each  agent.  If  the 
concentration  is  below  this  value,  it  is  treated 
as  if  there  were  no  agent  present. 

Dimension:  N. AGENT 

Values:  The  minimum  significant  concentration  for 

each  agent 


MIN.G.CHEM  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  provides  the  minimum  significant  level 
of  ground  deposition  for  each  agent.  If  the  depo¬ 
sition  is  below  this  value,  it  is  treated  as  if 
there  were  no  agent  present. 

Dimension:  N. AGENT 

Values:  The  minimum  significant  deposition  for 

each  agent 
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KULT.AG.DECON  GLOBAL  VARIABLE  (1-D) 


REAL 


This  array  provides  a  means  of  adjusting  the  time 
if  takes  to  decontaminate  a  given  body  area, 
T.DECON.  D,  drawn  from  DT.DECON,  t o  allow  for  the 
presence  cf  more  than  one  agent  on  the  skrn.  If 
there  is  a  second  agent  Dcesent,  T.DECON. D  will  be 
multiplied  by  M ULT.  AG. DECON  to  yield  the  time 
required  to  decontaminate  both  agents  simultane¬ 
ously.  If  there  are  three  aaents,  T.DECON.  D  will 
be  multiplied  by  MULT. AG. DECOR  twice;  etc. 

Dimension:  N.SIDE 

Value:  The  multiplication  factor  fcr  the  side  the 
PERSON  is  on 


N.  AGENT  GLOBAL  VARIABLE  INTEGER 


This  variable  gives  the  maximum  number  of  agents 
that  will  be  used  in  a  given  scenario.  If  is  "used 
to  dimension  all  arravs  ascendent  on  the  agent 
tyae,  and  set  the  value  for  all  "DO  LOOPS"  that 
iterate  over  the  agent  type. 

Value:  As  given  above 


N. ALARM  GLOBAL  VARIABLE  INTEGER 


This  variable  gives  the  number  of  ALARMS  created. 
Value:  As  given  above 


N.  PERSON  GLOBAL  VARIABLE  INTEGER 


This  variable  gives  the  number  of  PERSONS  created. 
Value:  As  given  above 


N.SIDE  GLOBAL  VARIABLE  INTEGER 


This  variable  gives  the  total  number  cf  sides 
(forces)  tc  be  played  in  the  sceanrio.  It  may  be 
simdy  1  (single  side  scenario),  2  (RED  on  BLUE  or 
eauivalent)  or  greater  than  two,  if  allied  and 
third-party  forces  are  played. 

Value:  As  given  above 


N.VEH. STS.  TYPE  GLOBAL  VARIABLE  INTEGER 


This  variable  gives  the  number  of  vehicle  system 
types  played  in  the  scenario.  The  two  attributes, 
system  type  and  veaDon  type  are  used  to  identify 
particular  vehicle  types. 

Value:  As  given  above 


N. VEH. WPN. TYPE  GLOBAL  VARIABLE 


INTEGER 


This  variable  gives  the  number  of  vehicle  weapon 
tyoes  played  in  the  scenario.  The  two  attributes, 
system  type  and  weapon  type  are  used  tc  identify 
particular  vehicle  types. 

Value:  As  given  above 


N.  VEHICLE  GLOBAL  VARIABLE  INTEGER 


This  variable  gives  the  total  number  of  vehicles 
created. 

Value:  As  given  above 


NAA.  FACTOR  GLOBAL  VARIABLE  ( 1-D)  REAL 


This  array  provides  the  reduction  factor  used  tc 
reduce  the  erfective  intravenous  dosage  to  account 
for  the  effect  of  a  nerve  agent  antidote.  This 
value  is  placed  m  the  array  A.  ANTIDOTE  when  a 
nerve  agent  antidote  is  injected.  When  A.  ANTIDOTE 
is  multiplied  by  the  current  IV  dosage  contained 
in  AGA.CuMECSE,  the  nerve  age  .J:  dosage  will  be 
reduced  by  the  NAA. FACTOR. 

Dimension:  N.SIDE 

Value:  The  reduction  factor  as  given  above 


NAME  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  consists  of  an  index  number  used  to 
identify  a  particular  PERSON.  Normally,  it  is  the 
number  of  the  DO  LOOP  iteration  index. 

Value:  As  given  above 


NUMBER  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  consists  of  an  index  number  used  to 
identify  a  particular  VEHICLE.  It  may  be  the 
number  of  the  DO  LOOP  iteration  index,  '  or  seme 
type  of  vehicle  bumper  or  serial  number. 

Value:  As  given  above 


OLD. DOSE  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  is  used  to  store  the  values  for  the 
accumulated  dosage  as  cf  end  of  the  Drevicus  iter¬ 
ation.  It  is  used  to  determine  times  at  which 
impairment,  incapacitation.  or  death  occured  (see 
routine  CHEHCAS. E FFECTS ,  Chapter  3,  Section  E)  It 
is  set  by  the  model  in  the  routine  UPDATE. 

Dimension:  N. AGENT 


Value:  As  given  above 


CLDCF  GLOBAL  VARIABLE  INTEGER 


This  variable  gives  the  value  for  the  incst  recent 
collective  protection  category  that  the  PERSON  was 
in,  if  he  changed  categories  durinq  DELT.  It  is 
set  equal  to  the  current  CP  value  at  the  beginning 
of  the  iteration  by  the  routine  UPDATE;  if  the  CP 
category  changes  for  any  reason,  the  old  category 
is  stored  in  OLDCF  for  the  remainder  of  the  itera¬ 
tion  and  the  new  CP  category  is  stored  in  the 
attribute  CP.  It  is  used  to  accurately  determine 
the  reduction  in  concentration  or  ‘  deposition 
caused  by  the  CP. 

Value:  As  given  above 


CLDX  TEMP.  ATTRIBUTE  REAL 


This  attribute  aivss  the  X  coordinate  of  the  loca¬ 
tion  of  the  PERSON  at  the  time  of  the  previous 
i-eration. 

Value:  As  given  above 


CLDY 

TEMP. 

ATTRIBUTE 

REAL 

This  attribute  c 
ticn  of  the  PE’ 
iteration . 

jives  <-he  Y 
*SON  at  the 

coordinate  of  the  ioca- 
time  of  the  previous 

Value:  As  given 

a  bove 

CPEN. CLOSED 

TEMP. 

ATTRIBUTE 

INTEGER 

This  VEHICLE  attribute  tells  if  the  vehicle  is 
open  or  closed.  It  is  used  to  determine  the 
leakage  of  agent  into  the  vehicle,  by  setting  an 
index  in  SW. NBC. FILTER 

Value: 

0  -  if  the  vehicle  is  open 
1  -  if  the  vehicle  is  closed 


EC.ACT.OHC  GLOBAL  VARIABLE  (2-D)  REAL 


This  array  provides  the  probabilities  that  an 
individual  will  choose  a  particular  one  of  three 
alternative  actions  in  seeking  or  creating  over¬ 
head  cover.  A  uniform  (0,1)  random  number  is  drawn 
and  compared  first  to  the  first  element  in  the 
second  dimension  -  If  this  number  is  less  than 
that  element  of  PC.ACT.OHC,  the  first  action  is 
chosen  (enter  a  vehicle).  If  the  number  is  greater 
than  or  eaqual  to  the  first  element,  but  less  than 
the  second  element  of  the  second  dimension,  the 
second  action  will  be  chosen  (enter  a  bunker)  . 
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Otherwise,  the  third  action  is  chosen  (create 
temporary  overhead  cover)  .  For  details,  se^ 
routine  OHC  (Chapter  3,  Section  4) 

Dimensions:  N.SIDE  by  2 

Value?: 

1st  dimension:  The  number  of  tne  side  tne  PERSON 
is  on 

2nd  dimension : 

1  -  The  probability  of  choosing  action  number  1 

2  -  The  probaility  of  choosing  action  number  2. 

added  tc  the  first  probability 


PC.  DEI.  DECON  GLOBAL  VARIABLE  (1-D)  HEAL 


This  array  provides  the  probabilities  of  chocsing 
tc  decontaminate  after  symptoms  of  chemical  agent 
Dcisoning  have  appeared.  If  decontamination  is 
chosen,  it  will  consist  of  removing  all  clothina 
and  gear,  decontaminating  the  entire  body,  and 
replacing  the  clothing  with  full  chemical  Drctec- 
tive  clothing.  This  option  is  offered  when  the 
routine  DECON  is  called  from  the  routine 
SYMPTOM.  DETECT  . 

Dimension:  N.SIDE 

Values:  .  Th$  probability  of  performing  delayed 
decontamination 


PC.  TKM.  DECON  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  provides  the  probabilities  of  choosing 
tc  decontaminate  immediately  after  disccverina  the 
presence  of  a  chemical  agent  hazard.  This  is 
prior  to  any  verification  that  the  hazard  in  fact 
does  exist.  If  decontamination  is  chosen,  it  will 
consist  of  first  decontaminating  exposed  skin, 
then  any  clothing  that  is  not  chemical  protective. 
After  decontamination  has  been  completed,  all 
areas  of  the  bcdv  will  be  covered  by  full  chemical 
protective  clothina.  This  option  is  offered  when 
the  routine  DECON  is  called  immediately  after 
detection  occurs. 

Dimension:  N.SIDE 

Values:  The  probability  of  performing  immediate 
decont  animation 


FC.MASK  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  contains  the  probability  of  a  PERSON 
treating  an  artillery  attack  nearbv  as  a  nonper- 
sistent  chemical  agent  attack.  If  the  PERSON  does 
regard  the  attack  as  possibly  non  persistent .  he 
will  mask  but  will  not  don  protective  clothing, 
nor  will  he  be  considered  to  have  detected  the 
presence  of  a  persistent  chemical  agent  hazard. 

Dimension:  N.SIDE 
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Values:  The  probability  as  given  above 


PC.MOPP  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  contai 

treating  an  incomi..^ - 

persistent  chemical  agent  attack, 
aces  reaard  the  attack  as  possibly 
will  den  full  protective  clothing, 
considered  to  have  detected  the 
persistent  chemical  agent  hazard. 


ns  the  probability  of  a  PERSON 
ng  artillery  attack  r.earbv  as  a 

If  the  PERSON 


he 

and  he  will  be 
Dresencs  of  a 


persistent . 

-rill 


Dimension:  N.SIDE 

Values:  The  probability  as  given  aoove 


PC.  MSKLEAK  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  contains  the  probability  that  a  protec¬ 
tive  mask  will  leak  with  respect  to  vapors  and 
aerosols  as  a  result  of  tsars,  combat  damage, 
imoroper  fitting  or  donnir.g,  etc.  If  the  mask 
will  leak,  me  leakage  amount  is  drawn  from 
D.  MSKLEAK. 

Dimension:  N.SIDE 

Values:  The  probability  as  given  above 


PC.NAA  GL03AL  VARIABLE  (1-D)  REAL 


This  array  contains  the  probability  that  the 
PERSON,  as  a  result  of  poor  training  or  panic, 
will  inject  himself  with  the  nerve  agent  antidote 
under  circumstances  other  than  the  appearence  of 
nerve  agent  symptoms,  such  as  detection  of  the 
agent  or  the  appearence  of  symptoms  caused  by  a 
chemical  agent  other  than  the  nerve  agent. 

Dimension:  N.SIDE 

Values:  The  probability  as  given  above 


FC.OHC  GIOBAL  VARIABLE  (1-D)  REAL 


This  array  contains  the  probability  that  a  soldier 
that  has  detected  the  aresence  of  a  persistent 
agent  hazard  by  any  means  will  assume  that  the 
agent  is  still  falling  toward  the  ground,  and  as  a 
result  will  seek  overhead  cover. 

Dimension:  N.SIDE 

Values:  The  probability  as  given  above 
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EC.  FF.  LEAK 


GLOBAL  VARIABLE  <2-D) 


REAL 


This  array  gives  the  probability  that  the  item  of 
full  chemical  protection  covering  a  given  body 
area  will  leak  with  respect  to  liquid  agents. 
This  leakage  may  be  caused  by  tears,  ccmbat 
damage,  iicrcper  fitting  or  donning,  some  agent 
beino  trapped  under  the  garment  from  inadequate  or 
no  decontamination.  If  the  item  will  leak,  the 
leakage  amount  is  drawn  from  D.PF.LEAK. 

Dimension:  N.SIDE  by  7 


V  C1U  CO  . 

1st  dimension:  The  side  that  the  PERSON  is  on 
2nd  dimension:  The  probability  as  given  above  for 
the  body  area  1  thru  7 


EERSCN  TEMP.  ENTITY 


This  temporary  entity  is  used  to  model  any  ccmca- 
tant  on  the  battlefield. 


PEFSETR  GI03AL  VARIABLE  (1-D)  INTEGER 


This  array  is  used  to  store  the  pointer  tc  the 
memopy  location  where  the  temporary  entity  PERSON 
and  its  attributes  are  stored. 


FF.CKEM  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  stores  the  pointer  to  the  arrav 
PFA.  CHEM,  which  provides  the  protection  factor  for 
each  of  the  seven  body  areas  of  the  PERSON. 


EF .LEAK  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  stores  the  pointer  to  the  arrav 
PFA.  LEAK,  which  provides  the  uercentage  leakage 
with  respect  to  liquid  agents*  of  the  chemical 
protective  clothing  on  each  of  the  seven  body 
areas  of  the  PERSON. 


FF.MAX  GLOBAL  VARIABLE  (2-D)  REAL 


This  array  provides  the  protection  factor  for  the 
item  that  provides  full  chemical  protection  for  a 
given  body  area.  Implicitly,  this  array  also 
defines  the  maximum  protective  (full  MOPP)  level. 

Dimensions:  N.SIDE  by  7 

V 3 Xu 6S  < 

1st  dimension:  The  side  that  the  PERSON  is  on 
2nd  dimension:  The  protection  factor  for  each  body 
area,  as  explained  above 
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FFA.CHEM 


GLOBAL  VARIA3LE  (1-D) 


REAL 


This  array  provides  the  current  protection  factor 
for  each  of  the  seven  body  areas  cf  the 
PERSON.  Implici  tiy ,  this  array  also  defines  the 
current  protective  (MOPP)  level. 


FF  A. LEAK  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  provides  the  percentage  leakage  with 
respect  to  liquid  agents  of  the  chemical  protec¬ 
tive  clothing  on  each  of  the  seven  body  areas  of 
the  PERSON.  The  leakage  may  be  caused  by  tears, 
combat  damage,  improper  fitting  or  donning,  seme 
agent  being  trapped  under  the  garment  from  inade¬ 
quate  or  no  decontamination.  Tne  determination  of 
whether  or  not  the  item  would  leak  was  accom¬ 
plished  through  a  comparison  to  PC. PF. LEAK.  If 
the  item  will  leak,  the  PFA . LEAK  value  is  drawn 
from  D .P? . LEAK . 


Dimension:  7 


Value 


0  -  If  the 
A  fraction 
leak 


item  does  not  leak 
between  0  and  1  if  the 


item  dees 


RDPTR 


TEMP.  ATTRIBUTE 


INTEGER 


This  attribute  serves  as  a  pointer  to  the  current 
lenath  of  the  array  a.  ROUND.  A.  SOUND  is  a  aueue 
in  which  the  time  and  chemical/r.on chemical  nature 
of  each  rcund  landing  sufficiently  near  to  the 
PERSON  during  DELT  to  cause  th9.  PERSON  tc  react 
are  stored. 


Value:  The  number  of  items  in  the  queue  stored 

A. ROUND 


ir 


ROUND  TEMP.  ATTRIBUTE  INTEGER 

This  attribute  serves  as  a  pointer  to  the  array 
A. ROUND,  which  is  a  queue  into  which  are  olacet 
the  time  and  che mical/fnonchemical  nature  or  each 
rcund  landing  sufficiently  near  to  the  PERSON 
during  DELT  to  cause  the  PERSON  to  react 


SIDE  GLOBAL  VARIABLE  INTEGER 


This  variable  is  used  to  store  the  value  of  the 
side  the  PERSON  is  on.  If  the  attribute  COLOR  is 
used,  SIDE  =  COLO  R(PERSON)  +  1 

Value:  COLOR  (PERSON)  +  1 


SKIN 


GLOBAL  VARIABLE  (2-D) 


REAL 


This  array  provides  the  skin  area  associated  with 
each  of  the  seven  body  areas.  Different  values  are 
allowed  for  different  sides  to  accomodate 
different  coverages  associated  with  items  cf  the 
standard  protective  gear  -  for  example,  with  one 
force  a  cloak  could  cover  down  to  the  knees;  in 
another  force  a  jacket  which  only  covers  down  to 
the  waist  is  used. 

Units:  square  centimeters 

Dimensions:  N.SIDE  by  7 

V  c l  Xll  6  S  * 

1st  dimension:  The  side  the  PERSON  is  on. 

2nd  dimension:  The  skin  area  associated  with  each 
body  area 


SOLDIER  GLOBAL  VARIABLE  INTEGER 


This  variable  is 
memory  location 
being  checked  in 

Value:  SOLDIER  = 
SW.EREATHING  GLOBAL 


used  to  conveniently  refer  to  tne 
of  the  PERSON  which  is  currently 
the  model. 

EERSPTR  (  NAME  (PERSON)  ) 

VARIABLE  {3-D)  REAL 


This  array  crovides  the  breathing 
PERSON  as  a  function  of  his  activity, 
is  determined  from  his  system  and 
VEH.SYS.TYFE  and  VEH. WPS.  TYPE,  and 
DEFNUM . 

0  n  it  s : 


rate  of  the 
His  activity 
weapon  type 
his  defilade 


Dimensions:  N. VEH . SYS. TYPE  by  N. VEH .WPN. TYPE  by  5 
V  a  lu  €  S  * 

1st  dimension:  The  VEH. SYS.  TYPE  of  the  PERSON 
2nd  dimension:  The  VEH.  WPN.  TYPE  of  the  PERSON 
3rd  dimension:  The  breathing  rate  associated  with 
the  DEFNUM  and  the  other  two  dimensions 


SW.  NEC.  FILTER  GLOBAL  VARIABLE  (6-D)  REAL 


This  array  provides  the  amount  of  leakage  cf  agent 
through  a  vehicle.  expressed  as  a  percentage  of 
the  outside  concentration.  It  is  used  tc  convert 
the  concentration  of  agent  in  the  air  and  deposi¬ 
tion  of  agent  on  the  exterior  of  the  vehicle  to  an 
equivalent  concentration  and  deposition  inside  the 
vehicle.  The  temporary  variable  PAX  is  used  to 
store  whether  or  not  the  PERSON  is  crew  or 

Sassenger  on  the  vehicle;  the  temoorary  variable 
ATCH  is  used  to  distinguish  between  a  vehicle 
with  overpressure  working  (CP=1);  a  vehicle 
without  overpressure,  closed;  and  either  vehicle 
open  (CP* 2 ) . 
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Dimensions:  N  .VEH.  SYS.  TYPE  by  N.VEH.WPN.TYPE  by  2 
by  3  by  2  by  N. AGENT 

Values  : 

1st  dimension:  The  VEH. SYS. TYPE  cf  the  person 
2nd  dime nsicn:  The  VEH.  WPN.  TYPE  of  the  PERSON 
3rd  dimension:  PAX 

PAX  =  1  if  PERSON  belongs  :o  a  set  CREW 
FAX  =  2  if  the  PERSON  does  not  belong  tc  a 
set  CREW 

4th  dimension:  HATCH 

HATCH  =1  if  CP  =  1  (vehicle  with  operating 
overpressure  system) 

HATCH  =  2  if  CP  =2  and  OPEN. CLOSED (VEHICLE) 
=  1  (vehicle  without  overpressure; 

closed) 

HATCH  =  3  if  OPEN.  CLOSED  (VEHICLE)  =  0 
5th  dimension:  State  of  agent 
1  -  for  liquid  agent 
?  -  for  vapor  or  aerosol 
6th  dimension:  The  aaent  type 


T.AG.IMFAIS  TEMP.  ATTRI3DTS  INTEGER 


This  attribute  serves  as  a  pointer  to  the  array 
TJ.t*ost3.  wh-'ch  '■'-■v-s  "hp  ‘iit  ■*  Ha  *  *■  S  p  *  ti  c  -  *  r — 
ment  dose  threshold  was  reached  for  each"  agehl. " 


T. AG. INCAP  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  serves  as  a  pointer  to  the  array 
TA. INCAP,  which  gives  the  time  that  the  incapaci¬ 
tation  dose  threshold  was  reached  for  each  aaent. 


T.CEEMCURR  GLOBAL  VARIABLE  REAL 


This  variable  serves  as  a  counter  that  keeps  track 
of  the  time  at  which  the  last  action  performed  or 
scheduled  to  be  performed  by  the  PERSON  was 
completed.  It  is  initially  set  at  the  time  of  the 
last  iteration.  TL;  as  events  occur  and  times  are 
assigned  to  them,  this  variable  is  incremented 
with  the  time  of  the  event:  as  actions  are  taken, 
the  variable  is  incremented  by  the  time  it  tock  to 
perform  that  action.  The  next  action,  therefore, 
will  begin  at  time  T . CHEMCURR . 


T.CHEMDET  TEMP.  ATTRIBUTE  REAL 


This  attribute  stores  the  time  at  which  the  PERSON 
detected  the  presence  of  a  persistent  chemical 
agent  hazard.  This  detection  may  have  occurred 
due  to  any  of  the  four  possible  means  of  detection 
fsee  the  DETECTION  routine  discussion  in  Chapter  3 
for  more  detail)  . 

Value:  The  time  at  which  detection  occurred 


T. CCNTAM 


TEMP.  A  TTRIBUTE 


REAL 


This  attribute  gives  the  time  at  which  contamina¬ 
tion  occurred  over  the  entire  surface  cf  the 
PERSON  or  his  collective  protection.  It  is 
assicned  a  time  when  the  attribute  CONTAMINATED 
changes  from  0  to  1. 

Value:  The  time  at  which  contamination  occurred 


T. CF  TEMP.  ATTRIBUTE  REAL 


This  attribute  provides  the  time  at  which  the 
PERSON  assumed  nis  current  level  of  collective 
prot  action . 

Value:  The  time  as  given  above 


T.  CURRENT  GLOBAL  VARIABLE  REAL 


This  variable  gives  the  current  simulation  time 
within  the  main  combat  modal  callina  the  chemical 
effects  routines. 

Value:  The  time  as  given  above 


T.DECON  TEMP.  ATTRIBUTE  REAL 


This  attribute  gives  the  time  at  which  the  process 
c:  decontamination  was  completed*  to  include  the 
dc.nainq  of  full  chemical  protection  after  deconta¬ 
mination. 

Value:  The  time  as  given  above 


T.LETH  TEMP.  ATTRIBUTE  REAL 


This  attribute  gives  the  time  of  death  occuring  as 
a  result  cf  an  overdose  of  chemical  agent.  It  is 
assigned  the  first  time  the  dosaqe  from  any  chem¬ 
ical  agent  passes  its  respective  lethal  dcse 
threshold. 

Value:  The  time  as  given  above 


T. MASK  TEMP.  ATTRIBUTE  REAL 


This  attribute  stores  the  time  at  which  the  PERSON 
finished  denning  his  protective  mask. 

Value:  The  time  as  given  above 
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T.  NAA 


TEMP .  ATTRIBUTE 


REAL 


This  attribute  stores  the  time  at  which  the  PERSON 
finished  injecting  himself  with  a  nerve  agent 
antidote. 

Value:  The  time  as  given  above 


T.OHC  ZEMP.  ATTRIBUTE  REAL 


This  attribute  orovides  the  time  at  which  the 
PERSON  assumed  his  current  level  of  collective 
protection,  if  he  went  into  CP  1,  2,  cr  3  during 

this  iteration;  otherwise,  it  is  the  time  that  he 
created  temporary  overhead  cover  in  CP  4  or  5.  It 
is  also  used  as  a  check  to  see  if  temcorarv  over- 
head  cover  exists. 

V  alue : 

0  -  if  no  overhead  cover  exists  (or  the  PERSON  is 
in  CP  1,  2,  or  3,  where  it  automatically 

exists) 

The  time  as  civen  above,  if  overhead  cover  exists. 


T.PF.CHEM  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  serves  as  a  pointer  to  the  array 
TA.PF.CHEM,  which  crives  the  time  that  the  current 
level  of  individual  chemical  nrotecticn  was 
denned,  for  each  body  area. 


TA. IMPAIR  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  provides  the  time  at  which  the  impair¬ 
ment  dose  threshold  was  reached  for  each  agent. 
Its  pointer  is  stored  in  the  attribute 
T.  AG.  IMPAIR. 

Dimension:  N. AGENT 

Vs  Xus  s  z 

0  -  if ’the  impairment  dose  threshold  has  not  been 
met 

The  time  as  given  above  if  the  impairment  dose 
threshold  has  beer,  reached 


TA. INCAP  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  provides  the  time  at  which  the  incapa¬ 
citation  dose  threshold  was  reached  for  each 
auent.  Its  pointer  is  stored  in  the  attribute 
T:  AG.  INCAP. 


Dimension:  N. AGENT 
Values : 

0  -  if  the  incapacitation  dose  threshold  has  not 
been  met 
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The  time  as  given  above  if  the  incapacitation 
dose  threshold  has  been  reached 


TA.PF.CHEM  GLOBAL  VARIABLE  (1-D)  REAL 


This  array  provides  the  nine  that  the  current 
level  of  individual  chemical  protection  was 
donned,  for  each  body  area.  The  pointer  to  this 
array  is  stored  in  the  attribute  T.PF.  CKZM. 


TL  GLOBAL  VARIABLE  REAL 


This  variable  gives  the  simulation  time  within  the 
main  combat  model  at  the  time  of  the  last  itera¬ 
tion. 

Value:  The  time  as  given  above 


OPTR  GLOBAL  VARIABLE  (1-D)  REAL 


This  amv  is  used  as  a  convenience  to  call  for  a 
uniform  (0,1)  random  number. 

Dimension:  3 

V  3X11  ss  « 

1  -  2  (the  uniform  distribution) 

2- 0  (the  first  parameter) 

3- 1  (the  second  parameter) 


VEH.NQ  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  consists  of  the  index  number  used 
tc  identify  the  VEHICLE  that  the  PERSON  is  on. 

Value : 

0  -  The  PERSON  is  not  on  a  vehicle. 

NUMBER  (VEHICLE)  that  the  PERSON  is  on,  otherwise. 


VEH.PTR  GLOBAL  VARIABLE  (1-D)  INTEGER 


This  array  is  used  to  store  the  pointer  tc  the 
memory  location  where  the  temporary  entity  VEHICLE 
and  its  attributes  are  stored. 


VEH .SYS .TYPE  TEMP.  ATTRIBUTE  INTEGER 


This  attribute,  along  with  VEH. WPN .TYPE,  is  used 
tc  identify  a  particular  vehicle  type. 

Value:  As  given  above 
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VEH  .  WPN  .TYPE 


TEMP .  ATTRIBUTE 


INTEGER 


This  attribute,  along  with  VEH. SYS .TYPE ,  is  used 
tc  identify  a  particular  vehicle  type. 

7 alu e :  As  given  above 


VEHICLE  TEMP.  ENTITY 


This  entity  is  used  no  model  every  vehicle  on  the 
battlefield. 


WARNING  TEMP.  ATTRIBUTE  INTEGER 


This  attribute  of  an  ALARM  tells  if  the  ALARM  ha 
sounded.  The  ALARM  will  automatically  sound 
warning  when  the  concentration  of  agent  in  the  ai 
at  the  location  of  the  ALARM  passes  the  threshold 
concentration  set  for  that  alarm  in  the  alotal 
variable  AG. AL. THRESH. 


X.  ALARM  TEMP  ATTRIBUTE  REAL 


This  attribute  gives  the  X  coordinate  of  the  loca¬ 
tion  of  the  ALARM  at  the  current  simulation  time, 
T.  CURB  ENT. 

Value:  As  given  above 


X.  CURRENT  TEMP.  ATTRIBUTE  REAL 


This  attribute  gives  the  X  coordinate  of  the  loca¬ 
tion  of  the  PERSON  at  the  current  simulation  time, 
T. CURRENT. 

Value:  As  given  above 


Y. ALARM  TEMP.  ATTRIBUTE  REAL 


This  attribute  gives  the  X  coordinate  of  the  loca¬ 
tion  of  the  ALARM  at  the  current  simulation  time, 
T. CURRENT. 

Value:  As  given  above 


I.  CURRENT  TEMP.  ATTRIBUTE  REAL 


This  attribute  gives  the  X  coordinate  of  the  loca¬ 
tion  of  ths  PERSON  at  the  current  simulation  time, 
T. CURRENT. 

Value:  As  given  above 
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APPENDIX  C 

SIHSCRIPT  IMPLEMENTATION 


ROUTINES 


1.  The  Routine  CHEM. CHECK 


Purpose: 


1.  Drives  the  model  and  calls  all  ether 
routines. 

2.  UDdates  the  depositions,  certain  alobal 
variables,  and  schedules  protection 
changes  cn  order  through  the  routine 
UP  E  ATE • 

3.  Determines  the  chemical  situation  faced  by 
each  person. 

4.  schedules  automatic  reactive  measures  (if 
any),  after  artillery  rounds  impact  near  a 
Dosition. 

5.  Schedules  a  chemical  detection.  either 

directly  or  through  a  call  to  the  routine 
DETECTION,  based  on  the  situation.  When  a 
chemical  hazard  is  detected,  schedules  the 
appropriate  reactive  measures  (seekina 

overhead  cover,  decont aminating^ 

increasing  crot action)  . 

6.  Updates  the*  dosage  through  a  call  to  the 
routine  D0SE1. 

7.  Assigns  times  at  which  dosaae  thresholds 

are  reached,  and  reactions  '{if  any)  to 
symptoms,  through  the  routine 

CH  EMCAS. E  EFECTS . 


ROUTINES  CALLED  BY  CHEM. CHECK 


CKEMCAS.  EFEECT 

CROSSING 

EECON 

DETECTION 

DISTRIB 

DOSE  1 

MASKING 

MOPP 

OHC 

UPDATE 


LABELS  USED  HITHIN  ROUTINE 


DETECT. CHEM 
DIRECT 
DCSECOMP 
REACT 


TEMPORARY  ATTRIBUTES  OF  PERSON 


INTEGER 


CEEHDET 


This  attribute  shows  if  the  PERSON  has 
detected  the  presence  of  a  persistent  chem¬ 
ical  agent  hazard  as  of  the  previous 
iteration  of  CHEM. CHECK. 

Values: 

0  -  indicates  r.o  detection 
1  -  indicates  detection 


CONTAMINATED 


This  attribute  indicates  if  there  is  contami¬ 
nation  over  the  entire  surface  of  the  PERSON 
or  his  collective  protection 
V  al  u  e  s : 

0  -  Nc  contamination  over  all  surfaces 
1  -  Contamination  present  on  all  surfaces 


r* 


This  attribute  indicates  the  current  level  of 
collective  protection  afforded  the  PERSON 
V  U  Q  S  * 

1  -  A""vehicle  with  an  operating  overpressure 

system 

2  -  A  vehicle  without  an  overpressure  system 

3  -  A  tunKer  or  building 

4  -  A  foxhole,  with  or  without  temporary 

overhead  cover 

5  -  Nc  protection  (the  PERSON  is  in  the  open) 


MASK 


This  attribute  indicates  if  the  PERSON  is 
wearina  the  chemical  protective  mask. 

Value  : ' 

0  -  if  the  mask  is  not  being  worn  (off) 

1  -  if  the  mask  is  being  worn  (on) 


RDPTR 


This  attribute  serves  as  a  pointer  to  the 
length  of  the  array  A. ROUND. 

Value:  The  number  of  items  in  the  queue 

stored  in  A. ROUND 


TEMPORARY  ATTRIBUTES  OF  PERSON  REAL 


OLDX 


This  attribute  gives  the  X  coordinate  of  the 
location  of  the  PERSON  at  the  time  of  the 
previous  iteration. 
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Value:  As  giver,  above 


OLDY 


This  attribute  gives  the  Y  coordinate  cf  the 
location  of  the  .PERSON  at  the  time  of  the 

Previous  iteration, 
alue :  As  given  above 


T.CHEMDET 


This  attribute  stores  the  tine  at  which  the 
PERSON  detected  the  presence  of  a  persistent 
chemical  acer.t  hazard. 


T .  CO  NT  AM 


This  attribute  gives  the  time  at  which 
contamination  occurred  ever  the  entire 
surface  of  the  PERSON  or  his  collective 
orotecticn.  I*  is  assianed  a  time  when  the 
attribute  CONTAMINATED  cSanaes  from  0  to  1. 
Value:  Ihe  time  at  which  contamination 

occurred 


T.MASK 


This  attribute 
PERSON  finished 
v  alue :  The  t  ime 


stores  the  tine  at  which  the 
donnina  his  Drotective  mask, 
as  given  accve 


T.OHC 


This  attribute  provides  the  time  at  which  the 
PERSON  assumed  his  current  level  cf  collec¬ 
tive  protection,  if  he  went  into  CP  1.  2,  or 
3  during  this  iteration;  otherwise,  it  is  the 
time  that  he  created  temporary  overhead  cover 
in  CP  4  or  5.  It  is  also  used  as  a  check  to 
see  if  temporary  overhead  cover  exists. 

Value : 

0  -  if  no  overhead  cover  exists  (or  the 
EEPSON  is  in  CP  1,  2,  or  3,  where  it 

automatically  exists) 

The  time  as  given  above,  if  overhead  cover 
exists. 


X. CURRENT 


This  attribute  oives  the  X  coordinate  cf  the 
location  of  the 'PERSON  at  the  current  simula¬ 
tion  time,  T. CURRENT. 

Value:  As  given  above 


Y. CURRENT 
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This  attribute  gives  the  X  coordinate  of  the 
location  of  the  PERSON  at  the  current  simula¬ 
tion  time,  T. CURRENT. 

Value:  As  given  above 


GLOEAL  VARIAELES  INTEGER 


CHEMSII 


This  variable  indicates  the  current  situation 
facing  the  PERSON  during  this  iteration. 

V  alu  es : 

0  -  The  PERSON  is  stationary  and  has  not  been 
directly  attacked  by  (in  the  immediate 
effects  ellipse  of)  a  chemical  agent 
munitio  n 

1  -  The  PERSON  is  in  the  immediate  effects 

ellipse  of  a  chemical  agent  munition.  He 
may  be  stationary  or  moving 

2  -  The  PERSON  is  moving  in  an  area  of  previ¬ 

ously  deposited  contamination.  There  is 
no  airborne  agent  present 

3  -  The  PERSON  is  movina  in  an  area  where 

tiers  is  still  agent 'in  the  air  (if  his 
net  ail  deposited  on  the  around)  ,  and 
has  not  been  directly  attacked  by  a 
chemical  munition 


N.  AGENT 


This  variable  gives  the  maximum  number  of 
agents  that  will  be  used  in  a  given  scenario. 
Value:  As  given  above 


SIDE 


This  variable  is  used  to  store  the  value  of 
the  side  the  PERSON  is  on.  If  the  attribute 
COLOR  is  used,  SIDE  =  COLOR  (PERSON)  +  1 
Value:  COLOR  (PERSON)  +  1 


SOLDIER 


This  variable  is  used  to  conveniently  refer 
to  the  memory  location  of  the  PERSON  wnich  is 
currently  being  checked  in  the  model, 
value:  SOLDIER  =  PERSPTR(  NAME  (PERSON)  ) 


GLOBAL  VARIAELES  REAL 


A. ROUND  (2-D) 


This  array  forms  a  queue  in  which  are  stored 
the  time  and  chemical/nonchemical  nature  of 
each  round  landing  sufficiently  near  to  the 
PERSON  during  DELT  to  cause  the  PERSON  to 
react 


Dimensions: ( A  number  large  enough  to 
accomodate  all  rounds  landing  close  anorak  to 
affect  the  PERSON)  by  2 
Value : 

1st  dimer.s  ion  :The  time  that  the  round 
2nd  dimension: 

0  -  if  the  round  is  not  chemical 
1  -  if  the  round  is  chemical 


DELT 


The  variable  DELT  is  a  user-supplied  param¬ 
eter  that  gives  the  time  interval  between 
iterations  of  CHEN. CHECK. 


DEP.  A.CURR  (1-D) 


This  array  holds  the  current  values  for  the 
concentration  of  agent  (s)  in  the  air  (at  a 
height  of  2  meters)  at  the  location  of  the 
PERSON. 

Units:  mg  /  cubic  meter 
Dimension:  N. AGENT 

Values:  As  given  above  for  each  agent 


DEP.  G.CURR  (1-D) 


This  array  holds  the  current  values  for  the 
deposition  on  the  ground  at  the  location  of 

•  *1*5  C  biuJw 

Units:  mg  /  sg.  cm 
Dimension:  Nt AGENT 

Values:  As  given  above  for  each  agent 


MIN.  A. CHEN  (1-D) 


This  array  provides  the  minimum  significant 
level  cf  air  concentration  for  each  agent. 
Dimension:  N. AGENT 

Values:  The  minimum  significant  concentration 
for  each  agent 


MIN.  G.CHEM  (1-D) 


This  array  provides  the  minimum  significant 
level  of  ground  deposition  for  each  agent. 
Dimension:  N. AGENT 

Values:  The  minimum  significant  deposition 
fcr  each  agent 


PC. MASK  (1-D) 


This  array  contains  the  probability  of  a 
PERSON  treatina  an  incoming  artillery  attack 
nearby  as  a  'nonpersisten t  chemical  agent 
attack. 


Dimension:  N.SIDE 

Values:  The  probability  as  given  above 


EC.HOPP  (1-D) 


This  array  contains  the  probability  cf  a 
PERSON  treating  an  incoming  artillery  attack 
nearby  as  a  persistent  chemical  agent  attack. 
Dimension:  N.SIDE 

Values:  The  probability  as  aivsn  above 


PC.OHC  (1-D) 


This  array  contains  the  probability  that  a 
soldier  that  has  detected  the  presence  of  a 
persistent  agent  hazard  by  any  means  will 
assume  that  the  agent  is  still  fallina  toward 
the  ground,  and  as  a  result  will  seek  over¬ 
head  cover. 

Dimension:  N.SIDE 

Values:  The  probability  as  given  above 


I.CHZMCU5R 


This  variable  serves  as  a  counter  that  keeps 
track  cf  the  time  at  which  the  last  action 
performed  or  scheduled  to  be  performed  by  the 
Person  was  completed. 


T  .CURRENT 


This  variable  gives  the  current  simulation 
time  within  the  main  combat  model  calling  the 
chemical  effects  routines. 

Value:  The  time  as  given  above 


This  variable  gives  the  simulation  time 
within  the  main  combat  model  at  the  time  of 
the  last  iteration. 

Value:  The  time  as  given  above 


OFTR  (1-D) 


This  array  is  used  as  a  convenience  tc  call 
for  a  uniform  (0,1)  random  number. 

Dimension:  3 
Values: 

1  -  2  (the  uniform  distribution) 

2- 0  (the  first  parameter) 

3- 1  (the  second  parameter) 
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RECURSIVE  VARIABLES 


REAL 


RETIME 


This  variable  is  used  to  store  the  earliest 
round  impact  time  stored  in  the  array  A. ROUND 
(1st  dimension). 


01  ;  0  2 


These  variables  are  used  to  store  a  random 
uniform  (0,1)  random  number. 


BRIEF  EX PLAI NATION  OF  CODE 


LINE  3 


Call  tc  the  routine  UPDATE,  which  initializes 
certain  temporary  variables,  assigns  the 
deposition  of  each  chemical  aoer.t  at  the 
location  of  the  P3RS0N  to  'the  arrays 
DEP.G.CLD,  DEP.G.CURR,  DEP.  A. OLD  and 

DEP.A.CURR,  and  checks  to  see  if  any  changes 
in  protection  category  or  individual  protec¬ 
tion  have  been  ordered  during  the  previous 
DELT  seconds. 


LINE  4 


Initializes  T. CHEMCURR  to  equal  the  ^ime  of 
the  last  CHEM. CHECK  (time  TL)  . 


LINES  5-14 


This  section  separates  out  several  possible 
situations  that  the  PERSON  concerned  might  be 
involved  in,  which  are  stored  in  the  variable 
CHEMSIT. 


LINE  9 


If  the  PERSON  is  moving,  I.OHC  is  set  to  zero 
because  he  cannot  have  temporary  overhead 
cover  while  moving. 


LINES  14  -  16 


If  the  PERSON  is  in  CHEMSIT  2,  all  futher 
routine  calls  will  be  handled  separately  by 
routine  crossing. 


LINES  18 


25 


Checks  to  see  if  the  PERSON  has  been  contami¬ 
nated  at  scaie  previous  rise.  If  he  has  net, 
and  his  current  deposition  DEP.G.C'JER  is 
greater  than  MIN. G. CHEM.  then  he  will  be 
narked  as  contaminated  by  assigning  a  value 
of  1  to  CONTAMINATED  and  a  time  of  contamina¬ 
tion  T.CONT  AM  based  on  the  ratio  of  the 
MIN. G .CHEM  level  to  the  current  deposition 
level . 


LINES  28,  35 


If  the  PERSON  regarded  the  arrack  as  poten¬ 
tially  chemical,  T.CHEMCURR  is  assigned  the 
time  cf  The  first  round  that  impacted  close 
enough  to  react  to.  RDTIME  was  first  set  at 
T. CURRENT,  the  latest  possible  time  that  a 
round  tcssibly  could  have  landed  during  CELT. 
Line  35  insures  that  the  final  value  of 
RDTIME  will  be  the  earliest  time  in  the 
queue . 


LINE  29 


If  the  individual  has  already  detected  the 
fact  that  ha  has  been  attacked  by  (or  exposed 
to  the  hazards  of)  a  chemical  agent,  then  the 
program  moves  down  to  the  dose  computation 
sequence  DOS  El . 


LINES  30-36 


Checks  if  the  PERSON  was  in  the  immediate 
effects  ellipse  cf  any  round  during  the  last 
DELT  seconds.  The  time  of  impact  of  any 
rounds  close  enough  to  have  affected  the 
PERSON  concerned  is  stored  in  the  first 
dimension  cf  A.  ROUND,  while  RDPTR,  gives  the 
length  of  the  round  queue.  The  second  dimen¬ 
sion  of  A. ROUND  has  a  (0,1)  bit  stating 
whether  or  not  any  of  those  close  rounds  were 
chemical  -  if  so,  CHEMSIT  is  updated  to  be  1. 


LINES  30  -  32 


If  the  individual  was  not  attacked,  moves  to 
the  label  DETECT. CHEM  to  see  if  detection 
will  occur. 


LINES  37  -  40 


If  a  uniform  (0,1)  random  number  is  less  than 
PC.  MASK,  the  PERSON  has  regarded  the  attack 
as  conventional.  The  routine  will  then  go 
directly  to  the  detection  sequence  (label 
DETECT. CHEM)  . 


LINES  42 


44 


Checks  to  see  if  the  PERSON  is  in  CP  =  1.  If 
he  is.  no  reaction  is  necessary.  The  PERSON 
will  have  detected  the  event,  with  T.CHEMPST 
set  equal  to  T.CHEMCURR.  The  next  step  will 
be  to  go  to  the  label  DOSECOMP,  wr.ere  the 
routine  DOSE  1  is  called. 


LINES  45  -  50 


If  the  PERSON  was  not  CP  *  1 ,  the  routine 
checks  to  see  if  his  mask  is  on.  If  net, 
MASKING  is  called.  T.  MASK  is  set  to 
T.CHEMCURR.  If  MASK  was  set  to  1  durina  the 
update  routine,  T.MASK  has  been  set  previ¬ 
ously.  T.CHEMCURR  is  set  equal  to  T.MASK  in 
either  case. 


LINES  56  -  60 


If  a  uniform  (0,1)  random  number  is  less  than 
PC.  MOPE,  then  the  Derson  will  have  detected 
the  presence  of  chemical  agent.  I . CHEMD2T  is 
set  egual  to  T.CHEMCURR.  The  routine  next 
calls  for  the  appropriate  protective  measures 
based  on  this  ‘detection  by  callina  the 
routines  OHC,  DECON,  and  MOPP. 


LINE  54 


If  the  PERSON  had  decided  not  to  mask  and/or 
treat  the  attack  as  a  persistent  agent 
attack,  the  routine  will  proceed  to  the  label 
"  DETECT. CHEM  ". 


LINES  61  -  62 


The  routine  DETECTION  is  called  to  see  if  the 
PERSON  will  detect  the  presence  of  a  chemical 
agent  from  signs  or  from  proximity  to  others 
who  have  detected  (or  suspected  and  thus 
reacted  to)  the  chemical  hazard. 


LINE  6  3 


The  routine  DOS  El  is  called  to  calculate  the 
total  dose  received  during  the  period  DELT. 


LINE  64 


The  routine  CHEMCAS.  EFFECTS  is  called.  This 
routine  takes  the  accumulated  dose  and  deter¬ 
mines  if,  based  on  that  dose,  impairment, 
incapacitation,  or  death  could  have  occurred 
to  that  person  during  DELT. 
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CODE 


1  ROUTINE  CSES  CHECK 

2  DEFINE  U1.U2,  R  DTI  HE  AS  0-DI KEN SIONAL,  REAL  VARIABLES 

3  CALI  UPDATE 

4  LET  T.CHEMCURE  =  TL 

5  IF  (X. CURRENT  (5CLDIE3)  IS  EQUAL  TO  OLDX  (SOLDIER) )  AND 

6  (Y. CURRENT  (SOLDIER  IS  EQUAL  TO  OLDY (s OLDISH  ) 

7  GO  TO  DIRECT 

8  REGARDLESS  LET  CHEMSIT  *  2 

9  LET  T.OHC  (SOLDIER)  *  0 

10  FOR  J  =  1  TC  N. AGENT  ,  DO 

11  IF  DEP.  A.CURR  (J)  IS  GE  SI  N.  A  .CHEH  (J)  .  GO  TO  DIRECT 

12  REGARDLESS  IF  DEP .G. C ORB { J)  IS  LT  MIN . G. CHEH  (J) ,  GO  TO  DIRECT 

13  REGARDLESS  LOCP 

14  LET  CHEMSIT  =  2 

15  CALL  CROSSING 

16  RETURN 

17  'DIRECT '  PRINT  1  LINE  THUS 
LABEL  DIRECT  REACHED  IN  CHEK. CHECK 

13  IF  CONTAMINATED  (SOLDIER)  IS  NOT  EQUAL  TO  1 

19  FOR  J  =  1  TC  N.  AGENT.  CO 


vi  —  l  iU  •  nu  Lii  1  >  fcVi 

IF  DEP.G.CURR  (0)  IS  GE  MI  N.  G.  CHEK  (J) 
LET  CONTAMINATED  (SOLDIER)  =  1 
LET  T.CCN TAM  (SOLDIER)  = 

(MIN.G.C 


(  (MIN 
REGARDLESS  LOOP 


HEM  (J)  / 


Lep.g. 


CURR(J))  *DELT  )  ♦  TL 


P  ft  F  0  Ii "  -3 

LIST  CHESDST  (SOLDIER),  RDPTE  (SOLDIER)  ,  CONT  AMIN  AT  ED  (SOLDIER) , 
T.CCNTAM  (SCLDISR) 

LET  RDTIKE  =  T. CURRENT 

IF  CHEMDET  (SCLDIER)  IS  NOT  EQUAL  TO  0.  GO  TO  DOSECOMP 
OTHERWISE  i e  RDFTR (SCLDI Efi)  IS  EQUAL  TO  0 


LET  CHEMSIT  =  0 
GO  TO  DETECT. CHEM 


• 'SOLDIER  WILL  NOT  REACT 
R  DTI  ME 


OTHERWISE  FOR  K  =  1  TO  SCFTR  (SOLDIER),  DO 

if  A.acanc (K,2>  is  equal  to  i,  let  chemsit  »  i 

REGARDLESS  LET  R DTI M E  *  MIN.F{  RDTIME,  A.ROUND(K.I)  ) 

LOOF 

LET  U1  =  DISTBIP (  UPTR (*)  ) 

LIST  U1,  EC.  MASK  (SIDE) 

IF  U1  IS  GT  EC.  MASK  (SIDE) 

GO  TO  DETECT. CHEK  •  'SOLDIER  WILL  NOT  REACT 

OTHERWISE  LET  T.CHSMCURR  *>  RDTIME 
IF  CP  (SOLDIER)  IS  EQUAL  TO  1 

LET  T. CHEMDET  (SOLDIER)  =  T.  CHENCDRR 

GO  TO  DCSECOMP  "IN  VEHICLE  WITH  OVERPRESSURE 

OTHERWISE  IF  MASK(SOLD  IER)  IS  NOT  EQUAL  TO  1  "NOT  ALREADY  MASKED 
CALL  MASKING 

LET  T.CHEMCURR  *  T. MASK (SOLD IER) 

REGARDLESS  IF  (TL  IS  LE  T . MASK ( SOLDIER) )  AND  (T. MAS K (SOLDIER) 

IS  LE  T. CURRENT) 

•  LET  T.CHEMCURR  =  T. MASK (SOLD IER) 

REGARDLESS  LET  U2  =  DISTBIB(  UPTR  (*)  ) 


<2  LIST  U2,  EC.  MCPF  (SIDE) 

1 3  IF  02  IS  GT  EC. MOPP  (SIDE) 

14  GC  TO  DETECT. CHEM  ''WILL  NOT  TREAT 

>5  OTHERWISE 

16  'REACT'  LET  T . CHEMDET (SOLDI ER)  *  T. CHEMCUBR 

1 7  CALL  OHC  GIVEN  PC.  OHC(SIDE) 

18  CALI  DECCN 

1 9  CALL  MOPP 

10  GO  TO  DCSECCME 

11  'DETECT. CHEM'  PRINT  1  LINE  THUS 
LABEL  DETECT. CHEM  RE  ACE ED  IN  CHEM. CHECK 

>2  PERFORM  DETECTION 

13  'DOSECOMP'  CALL  CCS  El 
>4  CALL  CHEMCAS. EFFECTS 

>5  RETURN 


WILL  NOT  TREAT  AS  PERSISTANT  CHEH  ATTACK 


66  END 


"OF  ROUTINE  CHEH. CHECK 
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ROUTINES  CALLED  BY  UPDATE 

D  1ST  RIB 
MASKING 
MUSS  SI  I 


SETS 


CHEW  (1-D) 

IZaFCEASY  ATTRIBUTE 5  INTEGER 

CEEMDET 


This  attribute  shows  if  the  PERSON  has 
detected  the  Dressnce  of  a  persistent  chem¬ 
ical  agent  hazard  as  of'  the  previous 
iteration  of  CHEM. CHECK. 

Values: 

0  -  indicates  no  detection 
1  -  indicates  detection 


CP 


This  attribute  indicates  the  current  level  of 
collective  protection  afforded  the  PERSON 
Values: 

1  -  A  vehicle  with  an  operating  overpressure 

system 

2  -  A  vehicle  without  an  overpressure  svstem 

3  -  A  fcunher  or  building 

4  -  A  foxhole,  with  or  without  temperarv 

overhead  cover 

5  -  No  protection  (the  PERSON  is  in  the  open) 


♦  exu*  c )  iiuo  (mi 


MASK 


This  attribute  indicates  if  the  PERSON  is 
wearing  the  chemical  protective  mask. 

Value : 

0  -  if  the  mask  is  not  being  wcrn  (off) 

1  -  if  the  mask  is  being  worn  (on) 


NAME 


This  attribute  consists  of  an  index  number 
used  to  identify  a  particular  PERSON. 

Value:  As  given  above 


VEH.  NO 


This  attribute  consists  of  the  index  number 
used  to  identify  the  VEHICLE  that  the  PERSON 
is  on. 

V sl  11 0  • 

0  -  The  PERSON  is  not  on  a  vehicle. 

NUMBER  (VEHICLE)  that  the  PERSON  is  on, 
otherwise. 


VEH.  SYS. TYPE 


This  attribute,  along  with  VEH. KPN .TYPE , 
used  to  identify  a  particular  vehicle  tyre, 
value:  As  given  above 


VEH.  KPN.  TYPE 


This  attribute,  along  with  VEH. SYS . TYPE ,  is 
used  tc  identify  a  oarticular  vehicle  type. 
Value:  As  given  above 


TEMPORARY  ATTRIBUTES  REAL 


T.  CHEMDET 


This  attribute  stores  the  time  at  which  the 
PERSON  detected  the  presence  of  a  persistent 
chemical  agent  hazard. 


T.CP 


This  attribute  provides  the  time  at  which  the 
PERSON  assumed  his  current  level  of  collec¬ 
tive  protection. 

Value:  The  time  as  given  above 


T .  MASK 
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This  attribute  stores  the  time  at  which  the 
PERSON  finished  donning  his  protective  mask. 
Value:  The  time  as  given  above 


T.OHC 


This  attribute  provides  the  time  at  which  the 
PERSON  assumed  his  current  level  of  collec¬ 
tive  orotection.  if  he  went  into  CP  1,  2,  or 
3  durir.a  this  iteration;  otherwise,  it  is  the 
time  that  he  created  temporary  overhead  cover 
in  CP  4  or  5.  It  is  also  used  as  a  check  to 
see  if  temporary  overhead  cover  exists. 

V  ^  X  3  • 

0  -  if  no  overhead  cover  exists  (or  the 
PERSON  is  in  C?  1,  2,  or  3,  where  it 

automatically  exists) 

The  time  as  given  above,  if  overhead  cover 
exists . 


X  .CURRENT 


This  attribute  gives  the 
location  of  the  PERSON  at 
tion  time,  T. CURRENT. 
Value:  As  given  above 


Y.  CURE  ENT 


This  attribute  gives  the 
location  of  the  PERSON  at 
tion  time,  T. CURRENT. 
Value:  As  giver,  above 


GIOEAL  VARIABLES 


N.  AGENT 


This  variable  gives  the  maximum  number  of 
agents  that  will  be  used  in  a  given  scenario. 
Value:  As  given  above 


Y  coordinate  of  the 
the  current  simula- 


integer’ 


CLDCP 


This  variable  gives  the 
recent  collective  protect 
the  PERSON  was  in,  if  he 
durina  DELT. 

Value:  As  given  above 


value  for  the  most 
ion  category  that 
changed  categories 


SIDE 


This  variable  is  used  to  store  the 
the  side  the  PERSON  is  on.  If  the 
COLOR  is  used,  SIDE  =  COLOR  (PERSON) 
Value:  COLOR  (PERSON)  ♦  1 


value  of 
attribute 
♦  1 
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SCLDISB 


This  variable  is  used  to  cor. veniently  refer 
to  the  memory  location  of  the  PERSON  which  is 
currently  being  checked  in  the  model. 

Value:  SOLDIER'  =  ?ERSPTR(  NAME  (PERSON)  ) 


VSH.  ?T 5 


(1-D) 


This  array  is  used  to 
the  memory  location 
entity  VEHICLE  and  its 


store  the  pointer  to 
where  the  temporary 
attributes  are  stored. 


GLCEAL  VARIAELES 


REAL 


AG. DECAY 


This  array  provides  the  amount  of  decay  of 
each  agent  due  to  weathering  that  can  be 
expected  to  occur  in  the  interval  DELT. 

Dimensions:  N. AGENT 

Value:  As  given  above,  for  each  agent. 


AGA.  CUMDOS2  (1  -D) 


This  array  holds  the  accumulated  IV 
for  each  agent. 

Dimension:  N. AGENT 

Value:  The  dosaae  in  mg  accumulated  ut 
current  time 


CHANGE. ORDER  (2-D) 


This  array  is  used  to  order  changes  in  chem¬ 
ical  protection  external  to  the  effects 
model.  The  array  can  be  accessed  by  any 
routine  by  the  name  of  each  PERSON,  and  the 
changes  in  protection  are  ordered  by  changing 
the  array  values  (they  are  initialized  at  -1 
by  the  driver  proaram) . 

Dimensions:  N. PERSON  by  10 
V U  3  • 

1st  dimension:  The  name  of  the  PERSON 
2nd  dimension: 

1  -  Enter  1  if  you  want  the  PERSON  to 

ma  sk 

2  -  Enter  the  value  of  the  new  CP 

category  if  you  want  the  PERSON  to 
change  his  collective  protection 
(values  1  -  5) 

3  -  Enter  1  if  you  want  the  PERSON  to 

create  temporary  overhead  cover 

4  -  Enter  the  value  of  the  protection 

factor  for  a  new  item  or  clothing 
or  gear  to  be  put  on  over  body  area 

5  -  Same  as  above  for  body  area  2 

6  -  Same  as  above  for  body  area  3 

7  -  Same  as  above  for  body  area  4 


dosage 
to  the 
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D . PE  .  L  ZAK 


8  -  Same  as  above  for  body  area  5 

9  *  Same  as  above  for  body  area  6 

10  -  Same  as  above  for  body  area  7 


(3-D) 


This  array  provides  the  probability  distribu¬ 
tion  for  determining  the  amount  of  leakage  to 
liquid  agents  found  in  the  items  of  protec¬ 
tive  clothing  that  cover  the  seven  body 
areas . 

Dimensions:  7  (the  number  of  body  areas)  by  3 
Values: 

1  -  The  distribution  type 

2  -  The  first  parameter  of  the  distribution! 

3  -  The  second  parameter  of  the  distribution 


DEP.  A.  CURR 


(1-D) 


This  array  holds  the  current  values  for  the 
concentration  of  agent (s)  in  the  air  (at  a 
height  of  2  meters)  at  the  location  or  the 
PERSON. 

Units:  me  /  cubic  meter 
Dimension:  N. AGENT 

Values:  As  given  above  for  each  agent 


DEP.  A.  OLD  (1-D) 


This  array  holds  the  most  recent  values  for 
the  concentration  of  aqent(s)  in  the  air  (at 
a  neight  of  2  meters)  at  the  location  of  the 
PERSON. 

Units:  mg  /  cubic  meter 
Dimension:  N.  AGENT 

Values:  As  given  above  for  each  agent 


DEP.  G.  CURR  (1-D) 


This  array  holds  the  current  values  for  the 
deposition  on  the  ground  at  the  location  of 
the  PERSON. 

Units :  mg/  sq.  cm 
Dimension:  N. AGENT 

Values:  As  given  above  for  each  aaent 


DEP.  G .  OLD  (1-D) 


This  array  holds  the  most  recent  values  for 
the  deposition  on  the  ground  at  the  location 
of  the  PERSON. 

Units:  mg/  sg.  cm 
Dimension:  N. AGENT 

Values:  As  given  above  for  each  agent 


DT.PP 


(4-D) 


This  array  holds  the  probability  distribution 
used  tc  determine  the  time  required  to  don  a 

?iven  item  of  chemical  protective  clothing, 
or  each  body  area. 

Dimensions:  N.SIDE  by  3 
Values : 

1st  dimension:  The  side  of  the  PERSON 
2nd  dimension: 

1  -  The  distribution  type 
2  -  The  first  parameter  of  the  distribu¬ 
tion! 

3  -  The  second  parameter  of  the  distri- 
bu  tion 


OLD.  DOSE  (1-D) 


This  array  is  used  to  store  the  values  for 
the  accumulated  dosage  as  of  end  of  the 

grevicus  iteration. 

imension:  N. AGENT 
Value:  As  given  above 


PC. PF.  LEAK  (2-D) 


This  array  gives  the  probability  that  the 
item  cf  full  chemical  protection  ccverina  a 
given  body  area  will  leak  with  respect  to 
liquid  agents. 

Dimension:  N.SIDE  by  7 
v  al  u  e  s : 

1st  dimension:  The  side  that  the  PERSON  is  on 
2nd  dimension:  The  probability  as  given  above 
for  the  body  area  1  thru  7 


PFA.CHEM  (1-D) 


This  array  provides  the  current  protection 
factor  fcr  each  of  the  seven  body  areas  of 
the  PERSON.  Implicitly ,  this  arrav  also 
defines  the  current  protective  (MOPP)  *  level. 


PFA.LEAK  (1-D) 


This  array  provides  the  percentage  leakage 
with  respect  to  liquid  agents  of  the  chemical 
protective  clothing  on  each  of  the  seven  body 
areas  cf  the  PERSON. 

Dimension:  7 
Values: 

0  -  If  the  item  does  not  leak 
A  fraction  between  0  and  1  if  the  item  dees 
leak 


T.CHEMCORR 


This  variable  serves  as  a  counter  that  keeps 
track  cf  the  time  at  which  the  last  action 

ferformed  or  scheduled  to  be  performed  by  the 
ERSON  was  completed. 


This  variable  is  used  to 
uniform  (0,1)  random  number 


store 


r  an  do  m 


cl 


E EIEF  SXPL AN 2  "'ION  OF  CODS 
LINS  7 


The  variable  T.CHEMCURR  is  initialized  at  TL 
in  order  to  schedule  changes  in  chemical 
protection  later  in  the  routine. 


LINE  8 


The  variable  OLDCP  is  initialized  at  the 
current  CP  cateaory  for  this  iteration  of 
CHEH.  CEEK. 


LINES  10  -  12 


The  old  accumulated  dosage  values  are  stored 
in  tha  array  OLD.  DOSE,  and  the  old  ground  and 
air  deposition  values  are  stored  in  the 
global  arrays  DEP.G.OLD  and  DEP.  A. OLD. 

LINES  14  -  16 


The  deposition  at  the  current  1. cation  of  the 
PERSON  is  set  at  the  current  concentration 
(at  z=0  meters  for  ground  and  z=2  meters  for 
air)  within  the  grid  drawn  by  NOSSE  II  (or  an 
equivalent  model)  .  In  order  to  develop  the 
code,  a  driver  program  called  NOSSE  It  was 
written  to  simulate  the  output  that  might  be 
obtained  from  a  deposition  &  transport  model. 
T' is  routine  has  been  included  in  the  section 
on  STAR  implementation. 


LINE  17 


It  is  possible  for  the  current  NOSSE  II  value 
to  be  less  than  the  Drevious  value  drawn  at 
the  last  update  if  the  individual  is 
departing  an  area  of  contamination.  3ecause 
the  true  value  for  the  individual,  rather 
than  the  terrain  he  is  standing  upon,  will 
continue  to  be  the  amount  of  agent  with  which 
he  was  previously  contaminated,  the  model 
sets  the  actual  outside  deposition 
DEP. G  .CORE (j )  for  the  ith  agent  at  the 
maximum  of  the  current  NOSSE  II  deposition  or 
the  previous  level  DEP.G.OI.D  (i)  ,  adjusted  for 
a  decay  factor  AG.DECAY(j). 


LINES  19  -  22 


The  routine  updates  the  attribute  CHEN.  SET  by 
assigning  it  a  value  of  one  if  the  individual 
had  a  time  of  detection  assigned  dermc  the 
last  iteration. 


LINES  23  -  7 C 


The  remaining  lines  schedule  protective 
status  changes  ordered  externally  to  the 
module.  This  is  accomplished  by  changing 
values  within  the  array  CHANGE. ORDER.  The 
routine  first  checks  to  make  sure  that  the 
ordered  change  has  not  been  previously  imple¬ 
mented.  If  it  had  been,  no  changes  are 
necessary. 


LINES  23  -  27 


If  the  first  variable,  CHANGE.  ORDER  (1)  was 
set  at  one,  the  individual  was  directed  to 
mask.  As  a  result,  the  M ASKING  routine  is 
called,  the  time  of  masking  T.MASK  is 
assigned  a  new  value,  and  T.CHEHCURR  updated 
to  allow  for  scheduling  of  subsequent  actions 
in  UPDATE  (if  any)  . 


LINES  28  -  36 


Changes  in  collective  protection  category  are 
considered  next.  The  old  CP  value  is  stored 
in  the  variable  OLDCP,  the  new  CP  is  given 
the  value  m  CHANGE.  ORDER,  the  time  is  set  to 
T.CHEMCURR,  and  CHANGE. ORDER  is  reinitialized 
to  -1.  If  the  change  is  to  CP  categories  1, 
2,  or  3.  the  overhead  cover  attribute  (OHC) 
is  adjusted  as  well. 


LINES  37  -  41 


The  overhead  cover  can  be  changed  separately 
from  the  CP  when  temporary  overhead  protec¬ 
tion  is  ordered. 


LINES  42  -  63 


Changes  the  individual  protection  for  any  or 
all  of  the  seven  body  areas  ordered  through 
the  new  level  of  protection  specified  in  the 
CHANGE. ORDER  subscripted  variable.  For  each 
body  area,  a  time  to  don  the  item  of  clothing 
is  drawn  from  the  array  DT.PF  and  assigned  to 
the  recursive  variable  T.PF.D.  The  time  at 
which  the  item  was  donned  is  assigned 
T.CHEHCURR  ♦  T.PF.D,  and  T.CHEMCURR  is 
updated.  Each  body  area  is  checked  tc  see  if 


a  leakage  factor  had  been  assiqr.sd 
previously.  If  it  had  not  been  (PFA.LEaK  = 
0),  the  possibility  of  leaking  is  evaluated 
bv  comparing  a  uniform  random  number  against 
P  C.  P  F .LEAK.  If  the  item  will  leak,  it  is 
a  ssianed  a  leakage  factor  ir.  P  F  A .  L  E  A  K  by 
drwaing  from  the  distribution  in  O.PF.LEAK. 
If  the  PF  in  body  area  2  was  to  be  changed, 
MASKING  is  called  to  adjust  the  values  for 
MASK  and  MASKLEAK.  It  will  also  set  a  value 
for  T . MASK,  but  the  masking  time  had  previ¬ 
ously  been  set  in  Line  48  (TA.  PF.  CHEn  (2) )  . 
To  correct  for  this,  T. MASK  is  set  equal  to 
T  A.  PF  .CHEM  (2  )  (line  59) 


CODE 


1  ROUTINE  TO  UPDATE  ••CHEH.CEECK 

2  PRINT  1  LISE  THUS 
ROUTINE  UPDATE  CALLED 

3  DEFINE  T.EF.C  AS  A  REAL,  1-DIMENSIONAL  VARIABLE 

4  DEFINE  AG  AS  AN  INTEGER,  0-DIME NS ICNAL  VARIABLE 

5  RESERVE  T.PF.C(»)  AS  7 

6  RESERVE  OLD.DCSE(*)  AS  H. AGENT  '  *  A  GLOBAL  VARIABLE  TO  STORE  OLD 

7  LET  T.CHEfiCURB  =  TL  "DOSAGE  INFORMATION 

8  LET  CLDCP  =  CP  (SOLDIER) 

9  FOR  J=1  TC  N. AGENT,  DO 

10  LET  DSR.G.CLC(J)  ■  DBF.  G.  CUR  R  (J) 

11  LET  DEF.A.CLDiJ)  *  DE R . A. CUR R  ( J) 

12  LET  OLD.  DCS-  <J)  *  AG  A  .  CUM  DOS  E  ( J  j 

13  LET  AG  =  J 

14  CALL  NUSSEII  GIVEN  T. CURRENT,  X .CURRE NT ( SOLDIER)  , 

15  Y.  CURRENT  (SOLDIER)  ,  AND  AG 

16  HEEDING  EEP.  G.CURR  (J)  AND  DEP.  A.  CURR  (J) 

17  LET  DEE. G.CURP.(J)  =  M AX .? (DE P. G. CURB  ( J)  ,  DEP .G .OLD (J) * AG  .DECAY  (J) ) 

18  LOOP 


IF  CHEMDET(SCLDIEH)  =  0  • 

THEN  IF  T.CHEMDET  (SOLDIER)  I 
LET  CHERDET( SOLDIER)  *  1 
REGARDLESS  • 

IF  CHANGE .ORDER  (  N A  A E (SO IDIE  R)  , 
THEN  I?  MASK  (SOLDIER)  IS  NOT 
CALL  MASKING 

LET  T. CHEMCURP  *  T. MASK (SOLD 
LET  CHANGE. CaDEH(  NAM  E  (SOLDI 
REGARDLESS  IF  CHANGE. ORDER (  NAM 
THEN  I?  CP  (SOLDIER)  IS  NE  CH 
LET  OLCCF=  CP  (SOLDIER) 

LET  CP  (SOLDI  ER)  *  CHANGE. CRD 
LET  T.CP  (SCLCI2R)  *  T.CHEMCO 
LET  CHANGE. OR DE 3 (  NAN£(SOLDI 
IF  CP  EQUALS  4  OH  CP  EQUALS 
ELSE  LET  T.OHC  (SOLLIES)  = 
REGARDLESS 


' UPDATE  CHEMICAL  DETECTION  STATUS 
S  NOT  EQUAL  TO  0 

•IMPLEMENT  MOPP  CHANGES  IF  ANY 
1  )  =  1  ' 'ORDERED  TO  MASK 

EQUAL  TO  1 


ER)  ,  1 )  *  -1 
£  (SOLDIER)  ,2)  IS  GT  0 
ANG2.  0  RDER  (  NAM  E  (SOLDIER)  ,  2) 
"ORDERED  TO  CHANGE  CP 
ER<  SAME(SOLDIER)  ,2) 

RH 

2)  S  -  1 

5,  IE!  T.OHC  (SOLDIER)  ■  0 
T.CP  (SOLDIER) 


REGARDLESS  IF  CHANGE .0 RD ER<  NAM  E  (SOLDIER)  ,3)  =  1  "CREATE  OHC 
THEN  IF  T.CHC  (SOLDIER)  IS  EQUAL  TO  0  AND  CP  (SOLDIER)  IS  GT  3 
LET  T.CHC  (SOLDIER)  *  T.CHEKCUFH 
LET  CHANGE. ORDER  (  NAM  E  (SOLDI  ER)  , 3)  *  -1 
REGARDLESS 

••REMAINING  LINES  ORDER  CHANGES  TO  PF  (1)  THROUGH  PF (7) 

FOR  1=1  TO  7,  DC 
IET  J  =  I  ♦  3 

IF  CHANGE. ORDER  (  NA  M  E  (SOLDIE  R)  ,  J)  IS  GEO 

THEN  IF  FFA.CHEM(I)  IS  NE  CHA NGE. ORDER < NAME < SOLDIER) ,J1 

LET  T.PF.D(I)  *  DISTRIB (  DT.PF  VEH.  S YS . TY PE, VEH. KPN .TYPE, I , *)  ) 

LET  TA.PF.CHnM  (I)  *  T.CHEMCUHH  ♦  T.PF.D(I) 

LET  EFA.CHEM(I)  *  C HANG E.O RDER (  NAM E (SOLDIER) ,J) 

IF  PFA.LEAK(I)  IS  2CUAL  TO  0 
LET  U  *  DISTRIB  (  (JPTR  (*)  ) 

LIST  U,  PC.  PF  .LEA  R  (SI  DE,  I) 

THEN  I f  0  IS  LE  PC .PF . LE AK (SI DE, I) 

LET  PFA.LEAK(I)  ■  DISTRIB(  D .PF . LEAK (SIDE, I , *)  ) 

. REGARDLESS 

LET  T.CKEMCURR  »  T A . PF. CHE M (I) 

I?  I  =  2  AND  CHANGE. CHDER  (  NAME  (SOLDIER)  ,J)  *  1  "MASK  DONNED 
CALL  BASKING 

LET  T .MASK (SOLDIER)  ■  T A. PF. CHEM < I) 

PEG  A  FDL  ESS 

LET  CHANGE. OBDEB(  NAME (SOL DIER) ,J)  ■  -1 
REGARDLESS 
LOOP. 

IF  (CP  (SOLDIER)  IS  GE  3)  AND  (T  .CP  (SOLDIER)  IS  GE  TL)  "LEFT  VEHICLE 
REMOVE  THIS  SOLDIER  FROM  THE  CREW  (  VEH. PXB (VEH. NO (SOLDIER) )  ) 

LET  VEH.  NC  (SCLDIER)  *  0 
REGARDLESS 


68  "  LIST  T.PF.D,  TA.PF.CHEM,  PFA.CHEM 

69  RETURN 

70  END  "OF  ROUTINE  UPDATE 
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The  Routine  MASKING 
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TEMPORARY  ATTRIBUTES 


INTEGER 


MASK 


This  attribute  indicates  if  the  PERSON 
wearing  the  chemical  protective  mask. 
Value : 

0  -  if  the  mask  is  not  being  worn  (off) 

1  -  if  the  mask  is  being  worn  (on) 


MASKLEAK 


This  attribute  indicates  the  amcunt  cf 
leakage  (if  anv)  that  the  mask  will  leak  to 
vapors  and  aerosols.  It  is  multiplied  bv  the 
ouside  concentration  of  aaent  at  the  PERSON'S 
location,  DEP.A.CURR,  to'yieldthe  effective 
concentration  of  agent  inside  the  mask.  The 
value  is  drawn  from  the  distribution 
D.MSKLEAK 
values: 

0  -  If  the  mask  does  not  leak 
A  fraction  between  0  and  1  if  the  mask  does 
leak 


NAME 


This  attribute  consists  of  an  index  number 
used  to  identify  a  particular  PERSON. 

Value:  As  given  above 


T.MASK 


This  attribute  stores  the  time  at  which  the 
PERSON  finished  donning  his  protective  mask. 
Value:  The  time  as  given  above 


GLOEAL  VARIAELES 


NTEGER 


SIDE 


This  variable  is  used  to  store  the  value  of 
the  side  the  PERSON  is  on.  If  the  attribute 
COLOR  is  used.  SIDE  =  COLOR  (PERSON)  +  1 
7alue :  COLOR  (PERSON)  +  1 


SCLDIER 


This  variable  is  used  to  conveniently  refer 
to  the  memory  location  of  the  PERSON  wnich  is 
currently  being  checked  in  the  model. 

Value:  SOLDIER  =  PERSPTR(  N  AHE  (PERSON)  ) 


GLOEAL  VARIABLES  REAL 


D.MSKLEAK  (2-D) 


This  array  orcvides  the  crobability  distribu¬ 
tion  for  the  leakage  of  the  protective  mask. 
Dimensions:  N.SIDE  by  3 
v  al  u  e  s : 

1  -  The  distribution  type 

2  -  The  first  parameter  of  the  distribution 

3  -  The  second  parameter  of  the  distribution 


D.  PF.  LEAK 


(3-D) 


This  array  provides  the  probability  distribu¬ 
tion  for  determining  the  amount  of  leakaoe  to 
liquid  agents  found  in  the  items  of  protec¬ 
tive  clothing  that  cover  the  seven  body 
areas .  . 

Dimensions:  7  (the  number  of  body  areas)  by  3 
Values: 

1  -  The  distribution  tyDe 

2  -  The  first  parameter*  of  the  distribution 

3  -  The  second  parameter  of  the  distribution 


DT.MASK 


(2-D) 


This  array  holds  the  probability  distribution 
used  to  determine  the  time  required  rc  don 
the  protective  mask. 

Dimensions:  N.SIDE  by  3 
Values: 

1st  dimension:  The  side  of  the  PERSON 
2nd  dimension: 

1  -  The  distribution  type 

2  -  The  first  parameter  of  the  distribution 

3  -  The  second  oarameter  of  the  distribution 


PC.SS  KLEAK  (1-D) 
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This  array  contains  the  probability  -ha* 
protective  mask  will  leak  wit’ 
vapors  and  aerosols. 

Dimension:  N.SIDE 
Values:  The  crobability  as  oi7sn 


with  restect  to 


aoove 


PC.PF.  LEAK 


<2-D) 


This  array  gives  the  probability  that  the 
item  of  full  chemical  protection  covering  a 
given  body  area  will  leak  with  respect  to 
liquid  agents. 

Dimension:  N.SIDE  by  7 
V  alues : 

1st  dimension:  The  side  that  the  PERSON  is  on 
2nd  dimension:  The  probability  as  given  above 
for  the  body  area  1  thru  7 


PF.MAX 


( 2—  D ) 


This 

t  he  i 
*»  ** 

arr  av 
(fall 
Dimen 
Value 
1  st  d 
2nd  d 


MOP  PI  level, 
sions:  N.SIDE  by  7 
2  Z 

Imension:  The  side  that  the  PERSON  is 
imension:  The  protection  factor  for  e« 
bodv  area,  as  explained  above 


PEA.  CHEM 


(1-D) 


This  array  provides  the  current  orctection 
factor  for  each  of  the  seven  body  areas  of 
the  FERSON. Implicitly ,  this  array  also 
defines  the  current  protective  (MOPP)  level. 


PFA.  LEAK 


(1-D) 


This  array  provides  the  percental 
with  respect  to  liquid  agents  of  t! 
protective  clothing  on  each  of  the 
areas  of  the  PERSON. 

Dimension:  7 
Values: 

0  -  If  the  item  does  not  leak 
A  fraction  between  0  and  1  if  the 
leak 


body 


item  does 


T.CHEMCORR 


This  variable  serves  as  a  counter  that  keeps 
track  of  the  time  at  which  the  last  action 

§erformed  or  scheduled  to  be  performed  by  the 
ERSON  was  completed. 


TA.PF.  CHEfi 


M-D) 


This  array  provides  the  time  that  the  currer.- 
level  of  individual  chemical  protection  was 
donned,  for  each  body  area. 


VS  TP.  (1-0) 


This  array  is  used  as  a  convenience  to  call 
for  a  uniform  (0,1)  random  number. 

Dimension:  3 
Values: 

1- 2  (the  uniform  distribution) 

2- 0  (the  first  oara meter) 

3  -  1  (the  second  parameter) 


RECURSIVE  V  ARIABLES  BEAL 


This  variable  is  used  to  store  the  time  that 
it  takes  to  den  the  protective  mask. 


U 


This  variable  is  used  to  store  a  uniform 
(0,1)  random  number. 


BRIEF  EXPLANATION  OF  THE  CODE 


LINE  4 


The  routine  determines  the  time  it  took  this 
PERSON  to  don  the  mask  by  drawing  from  th 
global  variable  DT. MASK.  The  value  drawn  i 
assigned  to  the  temporary  variable  T.M.D. 


The  attribute  T.HASK,  reoresenting  the  nm 
at  which  the  donning  process  was  completed 
is  set  at  the  current  simulation  time  ror  th 
individual,  T. CHEMCURR ,  plus  T.M.D. 


LINES  6-7 


Because  the  mask  also  provides  protection  t 
body  area  2  from  liquid  chemical  agen 
hazards,  the  value  PFA.CHEM(2)  is  updated  f 
show  that  added  protection,  and  the  tim 
T  A.  PF.CHEM  (2 )  is  changed  as  well. 
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o>  io  0)  »a>  0  4->oq> 


LINE  9 


The  attribute  MASK  is  sat  at  one,  indicating 
that  a  protective  mask  is  worn. 


LINE  10 


A  check  is  made  to  see  if  the  mask  had  been 
tagged  as  a  leaker  at  some  earlier  time 
(MASKIEAK  not  equal  to  0)  . 


LINES  11-13 


PC.  MSKLEAK 
number;  if 
equal  to  tha 


is  compared 
PC. MSKLEAK 
t  number,  the 


to  a  uniform  (0,1) 
is  greater  than  or 
mask  will  leak. 


LINE  14 


The  amount  of  leakage  is  set  bv  acoessinc  the 
D. MSKLEAK,  and  assigning  the  random  number 
drawn  from  the  distribution  indicated  by  the 
array  to  the  attribute  MASKLEAK. 


LINES  16  -  21 


A  check  is  made  to  see  if  the 
with  respect  tc  licuid  hazards 
has  not  previously 'been  tagged 
PC.  PF.LEAK  (2)  is  comDared  to 
random  number.  If  the  mask 
rasDect  to  liquids,  the  value 
is  drawn  from  the  distribution 


mask  will  leak 
If  the  mask 
,  the  variable 
a  uniform  (0,1) 
will  leak  with 
of  PF  A.  LEAK  (2) 
D.  PF.LEAK. 


CODE 


DEFINE  T.S.D,  U  AS  REAL  VARIABLES 
LEO  T.M.D  =  BISTEI B  (  DT.  BASK  (SI  DE,  «)  ) 
LET  T.MASK(SCIDIER)  =  T.CKEMCURR  ♦  T.M. 
LET  TA.?F.CHEM(2)  *  T.  MASK /SOLD  IER) 


1  ROUTINE  FOR  BASKING 

2  PRINT  1  USE  THUS 
ROUTINE  BASKING  CALLED 

3 

4 

5 

6 
7 
3 
9 

10 
1 1 
12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 
23 


"TINE  IT  TAKES  TO  MASK 
"ADJUSTING  PF  FOR  FACE 


_ _ 1(2)  *  T.  MASK /SOLD  IER) 

LET  PFA.CHEM/2)  =  PF  .«  A  X  (SIDE ,  2  ) 

LIST  T.M.D,  X.  MASK  (SOLDIER)  ,  N  A  M  E  ( SOLDIER)  ,  PF  A  .C  HE  M  (2)  ,  TA.  PF  .CHEH  (2) 

LET  MASK  (SOLDIER)  =  1 

IF  MASKLEAK  (SOLDIER)  IS  EQUAL  TO  0 

LET  U  *  D I STRIB (  UPTR  (*)  )  "  UNIFORM  (0 , 1)  RANDOM  NUMBER 

LIST  U,  PC. MSKLEAK (SIDE) 

THEN  IF  U  IS  LESS  THAN  PC.  MS  KLEAK  (SIDE)  "THEN  THE  MASK  BILL  LEAK 
LET  MASKLEAK (SOLDIER)  *  DISTBIB(  D. MS KLEAK (SIDE, *)  ) 

REGARDLESS 

IF  PFA. LEAK  (2)  IS  NOT  EQUAL  TO  0,  RETURN 
OTHERBISE  LET  U  *  DISTBIEJ  UPTR  (*)  )  " 

LXST  U  PC  PF  L^AK  (SIDE  2) 

IF'u  IS  LESS  THAN  p£.PF.  LEAK  (SIDE, 2)  "THEN  MASK  BILL  ALLOB  COST  AM. 

LET  PF  A.  LEAK  (2)  -  DIS1EI3(  D  .  PF.LEAK  (SIDE,  2  ,  *)  ) 

REGARDLESS 
P  ET  QPN 

END  "-OF  ROUTINE  FOR  MASKING 


UNIFORM  (0,1)  RANDOM  NUMBER 
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The  Routine  DETECT  I  ON 


Fur  pose 

1.  Schedules,  through  assignment  to  the 
attribute  T. CHEMDET ,  detection  cf  a  chem¬ 
ical  agent  hazard  due  to  physical  signs. 

2.  Schedules  detection  of  a  chemical  agen~ 
hazard  due  to  proximity  to  a  chemical 
alarm  or  another  PERSON  that  has  nrevi- 
ouslv  detected  the  hazard. 

3.  Schedules  injection  of  a  nerve  agent  anti¬ 
dote  upon  detection  of  the  hazard,  if 
desired  (this  would  be  a  wrongful  injec¬ 
tion  based  uoor.  detection,  not  symptoms  of 
nerve  agent  boisoning) . 

4.  If  detection'  occurs,  calls  the  routines 
OHC,  DECON  and  MOPP. 


RCUTINES  CALLED  3Y  DETECTION 


CECON 

MASKING 

MCFP 

NAA 

CHC 


LABELS  USED 


EXIT 

NEXT 

OUT 

PROXIMITY 


TEMPORARY  ATTRIBUTES 


INTEGER 


This  attribute  indicates  the  current  level  cf 
collective  orotection  afforded  the  PERSON 
V  alues : 

1  -  A  vehicle  with  an  operating  overpressure 

system 

2  -  A  vehicle  without  an  ova roressur e  system 

3  -  A  hunker  or  building 

4  -  A  foxhole,  with  or  without  temporary 

overhead  cover 

5  -  Nc  protection  (the  PERSON  is  in  the  coen) 


MASK 


This  attribute  indicates  if  the  PERSON  is 
wearing  the  chemical  protective  mask. 

V  &X  u©  s 

0  -  if  the  mask  is  not  being  worn  (off) 

1  -  if  the  mask  is  being  worn  (on) 


T.CHEMDET 


This  attribute  stores  the  time  at  which  the 
PERSON  defected  the  presence  of  a  persistent 
chemical  aaent  hazard.  This  derectior.  may 
have  occurred  due  zo  any  of  the  four  possicle 
means  of  detection  (see  the  DETECTION  routine 
discussion  in  chapter  3  for  more  detail)  . 


WARNING 


This  attribute  of  an  ALARM  tells  if  the  ALARM 
has  sounded.  The  ALARM  will  automatically 
sound  a  warning  when  the  concentration  of 
agent  in  the  air  at  the  location  of  the  ALARM 
passes  the  threshold  concentration  set  for 
that  alarm  in  the  global  variable 
AG.  AL. THRESH. 


TEMPORARY  ATTRIBUTES  REAL 


T.MASK 


This  attribute  stores  the  time  at  which  the 
PERSON  finished  donning  his  protective  mask. 
Value:  The  time  as  given  above 


X.  ALARM 


This  attribute  gives  the  X  coordinate  of  the 
location  of  the  ALARM  at  the  current  simula¬ 
tion  time,  T. CURRENT. 

Value:  As  given  a  cove 


Y. ALARM 


This  attribute  gives  the  X  coordinate  of  the 
location  of  the  ALARM  at  the  current  simula¬ 
tion  time,  T. CURRENT. 

Value:  As  given  above 


X. CURRENT 


This  attribute  gives  the  X  coordinate  of  the 
location  of  the  PERSON  at  the  current  simula¬ 
tion  time,  T. CURRENT. 

Value:  As  given  above 


Y.CJRRENT 


This  attribute  gives  the  X  coordinate  of  the 
location  of  the  PERSON  at  the  current  simula¬ 
tion  time,  T. CURRENT. 

Value:  As  given  above 
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GLOEAL  V  ARIAELES 


INTEGER 


ALPTS  (1-D) 


This  array  is  used  to  store  oho  pointer  to 
the  memory  location  where  the  tsmocrary 
entity  ALAxcM  and  its  attributes  are  stored. 


CEEMSIT 


This  variable  indicates  the  current  situation 
facing  the  PERSON  during  this  iteration.  The 
value  is  determined  by  CHEM  .CHECK  at  the 
beginning  of  the  iteration  ever  this  PERSON. 
Values: 

0  -  The  FERSON  is  stationary  and  has  not  been 
directly  attacked  by  (in  the  immediate 
effects  elliDss  of)  a  chemical  aoent 
munition 

1  -  The  PERSON  is  in  the  immediate  effects 

ellipse  of  a  chemical  acar.t  munition.  He 
may  De  stationary  or  moving 

2  -  The  PERSON  is  moving  in  an  area  of  previ¬ 

ously  deocsited  contamination .  There  is 
no  airborne  agent  oresent 

3  -  The  PERSON  is  moving  in  an  area  where 

there  is  still  agent  in  the  air  (it  has 
net  ail  deposited  on  the  around)  ,  and 
has  not  been  directly  attacked  by  a 
chemical  munition 


N.  AGENT 


This  variable  aives  the  maximum  number  of 
agents  that  will  be  used  in  a  given  scenario. 
It  is  used  to  dimension  all  arrays  dependent 
on  the  agent  type,  and  set  the  value  for  all 
"DO  LOOPS"  that  iterate  over  the  agent  type. 
Value:  As  given  above 


N.  ALARM 


This  variable  gives  the  number  of  ALARMS 
created. 

Value:  As  given  above 


N. PERSON 


This  variable  gives  the  number  of  PERSONS 
created. 

Value:  As  given  above 


FERSPTR  (1-D) 


This  array  is  used  to  store  the  pointer  to 
the  memory  location  where  the  temporary 
entity  PERSON  and  its  attributes  are  stored. 


IM 


This  variable  is  used  to  store  the  vaiae  of 
the  side  the  PERSON  is  on.  If  the  attribute 
CCL03  is  used,  SIDE  =  COLOR  (PERSON)  +  1 
Value:  COLOR  (PERSON)  +  1 


SOLDIER 


This  variable  is  used  to  conveniently  refer 
to  the  memory  location  of  the  PERSON  which  is 
currently  bema  checked  in  the  model. 

Value:  S0LDIER'  =  PERS?TR(  NAME  (PERSON)  ) 


GIOEAL  VARIABLES  REAL 


AL.MAX.DIST  (1-D) 


This  array  holds  the  maximum  distance  from  a 
PERSON  to  another  PERSON  or  ALARM  over  which 
he  would  hear  the  alarm  or  notice  the  reac¬ 
tion  cf  that  other  PERSON  to  a  chemical 
hazard.  Any  PERSON  or  ALARM  that  has  previ¬ 
ously  detected  the  presence  of  a  chemical 
hazard  will  warn  all  otner  PERSONS  within 
this  distance  of  his  position 
Dimension:  N.3IDE 

value:  Derived  from  normal  line-cf- sight 

conditions  and  the  expected  distance 
that  one  could  hear  the  standard  alarm 


DBF.  A  .  CURP.  (1-D) 


This  array  holds  the  current  values  for  the 
concentration  of  agent  (s)  in  the  air  (at  a 
height  of  2  meters)  at  the  location  or  the 
PERSON.  This  information  is  supplied  by 
NUSSE  II  or  seme  equivalent  model. 

Units:  mg  /  cubic  meter 
Dimension:  N.  AGENT 

Values:  As  given  above  for  each  aaent 


DEP.G.CURR  (1-D) 


This  array  holds  the  current  values  for  the 
deposition  on  the  ground  at  the  location  of 
the  PERSON.  These  values  are  supplied  ny 
NUSSE  II  or  some  equivalent  model 
Units:  mg/  sq.  cm 
Dimension:  N. AGENT 

Values:  As  given  above  for  each  agent 


DT. DETECT  (5-D) 


This  array  contains  the  probability  distribu¬ 
tion  that  is  used  to  determine  the  glimpse 


E 


probability  cf  detection,  PT.CHEMD2T,  of  a 
persistent  chemical  agent  hazard,  based  on 
noticing  physical  signs,  during  the  interval 
DELT.  If  PT.CHEMDET  is  greater  than  or  equal 
to  a  uniform  (0,1)  random  number,  detection 
will  have  occurred  during  DELT.  Because  the 
variable  PT.CHEMDET  is  a  probability,  only  a 
uniform  or  deterministic  distribution  (with 
parameter  (s)  between  0  and  1)  or  a  beta 
distribution  can  be  used. 

Dimensions:  4  by  K. AGENT  by  5  by  2  bv  3 
Values: 

1st  dimension:  The  chemical  situation  CHEMSIT 
+  1  (the  + 1  is  to  avoid  having  an  index 
cf  zero) 

2nd  dimension:  The  agent  present 
3rd  dimension:  The  collective  protection 

category  CP  (1  thru  5) 

4th  dimension:  The  value  of  the  attribute 

MASK  ♦  1  (mask  off  or  on) 

5th  dimension: 

1  -  The  distribution  type 

2  -  The  first  parameter  cf  the  distribu- 

ti  on 

3  -  The  second  parameter  of  the  distri¬ 

bution 


MIN.  A.  CHE 9 


(1-D) 


This  array  provides  the  minimum  significant 
level  of  air  concentration  for  each  aoen*.  If 
the  concentration  is  below  this  value,  it  is 
treated  as  if  there  were  no  agent  present. 
Dimension:  N. AGENT 

Values:  Tks  minimum  significant  concentration 
for  each  agent 

MIN.  G.  CHE M  (1-D) 


This  array  provides  the  minimum  significant 
level  cf  ground  deposition  for  each  agent.  If 
the  deposition  is  below  this  value,  it  is 
treated  as  if  there  were  no  agent  present. 
Dimension:  N. AGENT 

Values:  The  minimum  significant  deposition 
for  each  agent 


PC.NAA  (1-D) 


This  array  contains  the  probability  that  the 
PERSON,  as  a  result  or  poor  training  or 
panic,  will  inject  himself  with  the  nerve 
agent  antidote  under  circumstances  other  than 
tne  appea^ence  of  nerve  agent  symptoms,  such 
as  detection  of  the  agent  or  the  appearence 
of  symptoms  caused  by  a  chemicalagent  ether 
than  the  nerve  agent. 

Dimension:  N.SIDE 

Values:  The  probability  as  given  above 


PC.OHC  (1-D) 
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This  arrav  contains  the  probability  that  a 
soldier  that  has  detected  the  presence  of  a 
persistent  agent  hazard  by  any  means  will 
assume  that  the  aaent  is  still  fallina  toward 
the  ground,  and  as  a  result  will  seek  over¬ 
head  cover. 

Dimension:  N.SIDE 

Values:  The  probability  as  given  above 


I.CHEMCORR 


This  variable  serves  as  a  counter  that  keeps 
track  of  the  time  at  whicn  the  last  action 

ferformed  or  scheduled  to  be  performed  by  the 
ERSON  was  completed. 


T. CURRENT 


This  variable  gives  the  current  simulation 
time  within  the  main  combat  model  calling  the 
chemical  effects  routines. 

Value:  The  time  as  given  above 


This  variable  gives  the  simulation  time 
within  the  main  combat  model  at  the  time  of 
the  last  iteration. 

Value:  The  time  as  given  above 


UPTR  (1-D) 


This  array  is  used  as  a  convenience  to  call 
for  a  uniform  (0,1)  random  number. 

Dimension:  3 
Values: 

1- 2  (the  uniform  distribution) 

2- 0  (the  first  oarameter) 

3  -  1  (the  s ecor.d' parameter) 


RECURSIVE  VARIABLES  INTEGER 


This  variable  is  used  to  pass  the  number  of 
the  agent  concerned  as  an  argument  ot  another 
routine. 

Value:  AG  =  The  iteration  counter  j  (the 

agent  concerned) 


NEARBY. DET 


This  variable  is  used  to  store  the  pointer  to 
an  entity  -  PERSON  or  ALARM  -  that  is  checked 
for  proximity  and  detection  status  in  the 
section  of  the  routine  labeled  PROXIMITY. 
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5  ECURS  IVE  7  ARIABLES 


REAL 


ALARM.  DIST 


This  variable  is  used  tc  store  the  distance 
to  the  PERSON  or  ALARM  rhat  is  closest  to  the 
PERSON  and  has  detected  the  oreser.ce  cf  a 
persistent  chemical  agent.  If  rhe  variable  is 
less  than  AL.MAX.DIST  +  1  at  the  end  of  the 
iteration  over  all  PERSONS  and  ALARMS,  then- 
the  PERSON  has  detected  the  agent. 


DIST 


This  variable  is  used  to 
to  the  current  PERSON  or 
in  the  iteration  over  all 


store  the  distance 
ALARM  being  checked 
PERSONS  and  ALARMS. 


PT.CHEMDET 


This  variable  represents  the  probability  of 
detection  during  this  iteration  from  the 
glimpse  detection  model.  It  is  drawn  from  the 
array  CT.  DETECT. 


01;  U2 


These  variables  are  used  to  store  uniform 
(0,1)  random  numbers. 


A  BRIEF  EXPLANATION  OF  CODE; 


LINES  8  -9 


Checks  to  see  if  there  is  any  chemical  agent 
present  in  the  ground  or  in  the  air  at  the 
PERSONS  location.  If  there  is  not  agent 
present,  then  it  is  assumed  that  detection 
aue  tc  physical  signs  will  not  occur,  and  the 
routine  moves  down  to  the  ooir.t  where  it 
begins  to  check  for  alarms  or"  persons  nearby 
(label  PROXIMITY)  . 

LINES  17  -  25 


If  there  is  agent  present,  then  PT.CHEMDET  is 
drawn  from  the  array  DT.  DETECT.  PT.CHEMDET 
represents  the  probability  of  detection 
during  this  iteration  from  the  glimpse  detec¬ 
tion  model.  It  is  compared  to  a  uniform 
(0,1)  random  number  to  determine  if  detection 
occurred  during  the  last  DELT  seconds.  If 
PT.CHEMDET  is  greater  than  or  equal  to  the 
random  number,  T. CHEMDET  is  assianed  the 
value  shown  if  previously  equal  to  z£ro.  If 
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T.CHEMDET  had  been 
value  due  to  another 
earliest  time  (lines 


previously  assigned  a 
agent,  it  is  a iven  the 
23-24). 


LINES  30  -  56 


Detenines  if  the  PERSON  will  detect  the 
oresence  of  an  aqent  based  or.  a  chemical 
agent  alarm  or  by'  noticing  a  person  nearby 
who  has  detected  the  agent.  The  rouitne  will 
examine  every  ALARM  and  every  ether  PERSON 
for  proximity  and  detection  status. 


LINES  31;  46 

Assigns  th  Dcinter  to  another  PERSON  or  ALARM 
to  tne  temporary  variable  NEARBY.  DET. 

LINES  33  -  36;  47  -  50 

Computes  the  straight-line  distance  to 
N  EAE3Y . DET. 


LINES  37  -  42 


Checks  to  see  if  NEARBY. DET  is  within  the 
maximum  alarm  distance,  AL. MAX. DIST,  and  if 
NEARBY. DET  has  detected  previously.  If  so, 
assions  ■  ALARM. DIST  the  distance  to 
N  EAR BY .DET. 


LINES  51  -  54 


Checks  to  see  if  NEARBY. DET  is  within  the 
maximum  alarm  distance,  AL. MAX. DIST,  and  if 
NEARBY. DET  (an  alarm)  has  sounded  the 
warning.  If  so,  assigns  ALARM. DIST  the 
distance  to  NEARBY. DET. 


LINES  58  -  64 


If  one  or  more  PERSONS  or  ALARMS  nearby  has 
detected  a  chemical  agent,  ALARM. DIST  will  be 
less  than  or  ecrual  to  the  distance 
ALARM. DIST. M  AX,  so*the  PERSON  being  updated 
will  have  a  time  of  detection  T.CHEMDET 
assigned. 


LINES  66  -  67 


If  he  failed  to  detect  the  presence  of  a 
chemical  hazard,  the  routine  returns  to 
CHEM. CHECK;  otherwise,  the  current  simulation 
time  I  .CHE  MC  (JRE  is  assigned  the  value  for  the 
PERSON'S  detection  time,  T. CHEMDET . 


LINE  68 


If  the  PER  SON  is  inside  a  vehicle  with 
overpressure  (CP=1)  ,  the  routine  returns  to 
CHEM. CHECK  since  it  is  assumed  than  soldiers 
inside  closed  vehicles  with  overpressure  will 
not  need  to  react  to  the  detection  event. 


LINES  69  -  75 


If  the  PERSON  is  not  in  a  CP  equal  to  1,  then 
a  check  is  made  to  see  if  he  is  masked.  If 
not,  the  mask  routine  is  called  and 
T.CHEMCUKR  is  undated.  If  T.MASK  had  been 
assigned  a  v alue' previously  within  OELT ,  it 
is  integrated  into  the  current  event  sequence 
bv  uocating  T.CHEMCUPR  to  the  value  previ¬ 
ously  assigned  to  T.MASK. 


LINES  76  -  80 


Checks  to  see  if  the  PERSON  will  iniect  a 
nerve  agent  antidote  based  on  a  panic  reac¬ 
tion  tc  the  detection  of  the  attack.  If  a 
uniform  (0,1)  random  number  is  less  than  or 
equal  to  PC.NAA,  then  the  NAA  routine  is 
called  and  injection  will  occur. 


LINES  81  - 


Since  tne  PERSON  at  this  point  will  have 
detected  the  presence  of  a  chemical  agent 
during  the  iteration  (since  he  has  net  yet 
exited  the  routine),  the  DETECTION  routine 
will  call  the  routines  OHC,  DECON,  and  MOPP. 


1  ROUTINE  FOB  DETECTION  *  *  OF  CHEMICAL  AGENTS 

2  PRINT  1  USE  THUS 

DETECTION  ROUTINE  CALLED  FRCH  MAIN 

3  DEFINE  X,  Y ,  ALAFM.DIST.  FT. CHE  KDET  AND  DIST 

4  AS  O-tIMENSICSAL,  REAL  VARIABLES 

5  DEFINE  ME AS  B  Y . D  ET,  AG  AS  0-DIME NSIONAL,  INTEGER  VARIABLES 

5  FOR  0*1  TC  a.  AGENT,  DO 

7  LET  AG  *  J 

8  IF  l  (DEP.G.CURR(J)  IS  GE  H I N.  G .CHEM  ( J|_)  OR  (DEP.  A.CORR  (J) 

9  IS  GE  MIS. A.CHEM (J) )  )  •• AGENT  PRESENT  AT  LOCATION 

10  LET  PT.CHEMDET  =»  DISTRI3(  DT. DETECT  (  (CHEMSIT+1), 

11  AG,  CP  (SOLDIER)  ,  (MASK  (SOLDIER)  ♦  1)  ,  *  )  ) 

12  PRINT  1  LINE  8ITH 

13  DT. DETECT  ( (CEEMSIT ♦ 1 ), J , CP (SOLD IER) , (MASK  (SOLDIER) +1 ) ,1) , 


16  T  HU  S 

DT. DETECT  CALLED:  ****  **•* 

17  LET  U1  *  C ISTRI 3  (  UPTR  (*>  ) 
13  LIST  01,  PT.CHEMDET 


MAS  K  (SOLDIER  -M  ,2 
MASK  (SOLDIER) +1)  ,3 
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THEN  IF  U1  IS  LE  P? .  CK  END  El  "DETECTION  HAS  OCCURRED 

I?  T. CHE MEET  (SOLDIER)  IS  EQUAL  TO  0 

IEI  T.  CHEMDE1'  (SCLDIER)  =  (  ( 1-PT  .CHE.1  DET)  * 
(T.CURRENT-T.CHEMCJ5R)  )  ♦  T.CHEMCURR 

ELSE  LET  T.CHEMDET  (SOLDIER)  *  MIN  .  ?  (  T. CHEMDET (SOLDIER)  , 

(  (  (1-PT. CHEN  DEI) * (T. CURRENT-T .CHEMCURR))  ♦  T.CHEMCURR)  ) 
ALWAYS 


REGARDLESS  LCC? 

LIST  T.CHZMDET(SCLDIERI 
•PROXIMITY*  LET  ALARM.  DIST 
PRINT  1  LINE  THUS  REACHED 
?Oa  I  *  1  TC  N.  PERSON, 

LET  NEAREY. CET  *  EERS  FTR  ( I) 

IF  PERSPTP.(I)  *  SOLDIER,  GO  EXIT 

OTHERWISE  LET  X  *  X.  C  USR  ENT  (NEARBY  .  DET) 
LET  Y  *  Y. CURRENT  (NEAREY. DET) 


=*  AL. MAX .DIST (SIDE)  ♦  1 
•  EFCXIMI TY '  IN  DETECTION  ROUTINE 
DC 


LET  DIST  =  SCRT.Fj  (X-X.CURR  ENT  (SOLDIER)  )  **2  ♦ 
(Y-Y.  CURRENT (SOLDIER)  ) **2  ) 

I?  DIET  IE  LESS  THAN  ALARM. DIST 
.  CET)  ,  NAME  I 
.DET  ,  TL 
(T.CHEMDET  O 


"LIST  NAME  (NEAREY.  CET 
"T.CHENDET  (NEAREY.  D 
THEN  IF  (T 
it?. 


i  (SO LDI ER)  ,  X,T,X. CURRENT,!. CURRENT, DIST, 


_  NEARBY . DET)  IS  LE  TL)  AND 
(T.CHEMDET < NEAHEY.DET)  IS  NOT  EQUAL  TO  0) 
LET  ALARM . D 1ST  *  DIST 
REG ARTLESS 
•EXIT*  LOOP 

FOR  K  *  1  TC  N. ALARM ,  DO 

LET  NEAR9Y.DET  =  ALPTR(I) 

LET  X  =  X. ALARM (NEARBY. DET) 

“  “  ARM  (NEARBY. DET) 

. . -  2 


LET  X  -  X.  ALARM (NEARBY. DET) 

LET  DIST  *  SQRT . F  (  < X - X. C URR  ENT  (SOLDIE R)  )  ** 
(Y-Y. CURRENTS  SOLDIER)  )  **  2  ) 

IF  DIET  IE  LESS  THAN  ALARM. D 1ST 
THEN  IE  WARNING/NEARBY.DET)  I* 

SEA  ?.  3  Y  .DET,  WARNI  S3  (NEARBY.  DET)  , 

LET  ALARM. DIST  ■  DIST 


"LIST  S 


REGARDLESS 
LOOF 

LIST  ALARM.  DIST,  AL  .  KA  X  .  DI 3T  (SID  E) 
IF  ALARM. CIST  IS  LE  AL. MAX. DIST 
IF  •  “ 


IS  EQUAL  TO 
DIE 


_ (SIDE) 

F  T.CHEMDET  (SOLDIER)  IS  NOT  EQUAL  TO  0 
LET  T.  CHEMDET  (SOLDIER)  *  MIN.Ff  T.  Cl! 
.DI3T/AL. MAX. DI5T( SICE)  i  *(T .rURRENT-T. 


)  *<T .rURRENT-T. CHEMCUR  R) ) 
XDIER1  *  (((ALARM.  DIST/ 

URBEST-T .  CHEMCURR) )  ♦ 


(((ALARM _ _ _ _ 

ELSE  LET  l.CHEM.UET  ISC 

AL. M AX. CIST  (SIDE))*  (T.C 
ALWAYS  REGAPDLESS 
LIST  T.CHEMDET  (SCLDIER) 

IF  I.CHEMCETJSOLDIER)  *  0,  GO  OUT 
OTHERWISE  LET  T.CHEMCURR  »  T.CH  EMDET  (SOLDIER) 
IF  CP  (SOLDIER)  *  1  ,  GO  OUT 

OTHERWISE  IF  MASK(SOLDIEB)  IS  NOT  EQUAL  TO  1 
CALL  MASKING 

LET  T . CHESCURR  ■  T.  M A SK (SOLD  I ES) 

REGARDLESS  IF  (TL  IS  LE  T .MASK ( SOLDIER) ) 

IS  LE  T. CURRENT) 

LET  T.CHEMCURR  »  T. H ASK (SOLDIER) 

REGARDLESS 

•NEXT'  LET  U 2  *  CISTRI3(  0PTB(*)  ) 

LIST  PC.NAA.  Q2 

IF  PC.NAA  (SICE)  IS  3E  U2 
CALL  NAA 
REGARDLESS 

CALL  CHC  GIVEN  PC.OHC(SIDE) 

CALL  CECCN  ' 

CALL  MCPP 
RETURN 

"OF  ROUTINE  FOR  DETECTION 


EMDET  (SOLDIER)  , 
- DURR))  ♦  u 


T.CHEMCURR)  ) 
T. CHESCURR) 


"NOT  ALREADY  MASKED 


AND  (T. MASK  (SOLDIER) 


•OUT' 

END 
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5 •  The  fio u t in e  CEC 


Purpose : 

1.  If  the  PERSON  is  not  already  under  over¬ 
head  cover,  decides  if  the  ? 22 SOM  will 
seek  overhead  cover  inside  a  vehicle  or 
bunker,  create  temporary  overhead  cover, 
or  fail  to  assume  overhead  cover  (thereby 
implicitly  assuming  that  there  is  no 
persistent  agent  threat  in  the  air) 

2.  If  overhead  cover  is  created  or  assumed, 
draws  a  time  for  this  to  be  completed  ana 
assigns  it  to  the  attribute  T.OHC. 


ARGUMENTS 


PFOB 


REAL 


This  argument  contains  the  probability  that  a 
soldier  that  has  detected  the  presence  of  a 
persistent  aaent  hazard  by  any  means  will 
assume  that  the  agent  is  still  falling  toward 
the  ground,  and  as  a  result  will  seek  over¬ 
head  cover. 

Dimension:  N.SIDS 

Values:  If  is  given  the  value  contained  in 
the  variable  PC.OHC  for  the  side  the 
PERSON  is  on,  except  when  the  routine  is 
called  from  DECON2.  In  the  latter  case, 
is  is  given  a  value  of  one. 


LABELS 


A  1 
A  2 
A3 
OUT 


TEMPORARY  ATTRIBUTES  INTEGER 


CP 


This  attribute  indicates  the  current  level  of 
collective  protection  afforded  the  PERSON 
V  alues: 

1  -  A  vehicle  with  an  operating  overpressure 

system 

2  -  A  vehicle  without  an  overpressure  system 

3  -  A  bunker  or  building 

4  -  A  foxhole,  with  or  without  temporary 

overhead  cover 

5  -  Nc  protection  (the  PERSON  is  in  the  open) 
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TEMPORARY  ATTRIBUTES 


REAL 


T.  CP 


This  attribute  provides  the  tins  at  which  the 
PERSON  assumed  his  current  level  cf  collec¬ 
tive  protection. 

Value:  The  time  as  given  above 


T.OHC 


This  attribute  provides  the  time  at  which  the 
PERSON  assumed  'his  current  level  of  collec¬ 
tive  protection,  if  he  went  into  CP  1,  2,  or 
3  during  this  iteration;  otherwise,  it  is  the 
time  that  he  created  temporary  overhead  cover 
in  CP  4  or  5.  It  is  also  used  as  a  Chech  to 
see  if  temporary  overhead  cover  exists. 

Value : 

0  -  if  no  overhead  cover  exists  (or  the 
EERSON  is  in  C?  1 ,  2,  or  3,  where  it 

automatically  exists) 

The  time  as  given  above,  if  overhead  cover 
exists . 


GIOEAL  VARIABLES  INTEGER 


CF.EMSIT 


This  variable  indicates  the  current  situation 
facing  the  PERSON  daring  this  iteration.  The 
value  is  determined  by  CHEM. CHECK  at  the 
.beginning  of  the  iteration  over  this  PERSON. 
Values: 

0  -  The  PERSON  is  stationary  and  has  not  been 
directly  attacked  by  (in  the  immediate 
effects  ellipse  of)  a  chemical  agent 
munition 

1  -  The  PERSON  is  in  the  immediate  effects 

ellipse  cf  a  chemical  a  cent  munition.  He 
may  Be  stationary  or  moving 

2  -  The  PERSON  is  moving  in  an  area  of  previ¬ 

ously  deposited  contamination.  There  is 
no  airborne  agent  present 

3  -  The  PERSON  is  moving  in  an  area  where 

there  is  still  agent  in  the  air  (it  has 
net  all  deposited  on  the  ground)  ,  and 
has  not  been  directly  attacked  by  a 
chemical  munition 


OLDCP 


This  variable  gives  the  value  for  the  most 
recent  collective  protection  category  that 
the  PERSON  was  in,  if  he  changed  categories 
during  DELT.  It  is  set  equal  to  the  current 
CP  value  at  the  beginning  of  the  iteration  by 
the  routine  UPDATE;  if  the  CP  category 
changes  for  any  reason,  the  old  category  is 
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stored  in  OLDCP  for  the  remainder  of  the 
iteration  and  the  new  CP  category  is  stored 
in  the  attribute  CP.  It  is  used  to  accurately 
deter  line  the  reduction  in  concentration  or 
deposition  caused  by  the  CP. 

Vaiue:  As  given  above 


SIDE 


This  variable  is  used  to  store  the  value  of 
the  side  the  PERSON  is  on.  If  the  attribute 
COLOR  is  used,  SIDE  =  COLOR  (PERSON)  +  1 
Value:  COLOR  (PERSON)  +  1 


SCLDIER 


This  variable  is  used  to  conveniently  refer 
to  the  memory  location  of  the  PERSON  wnich  is 
currently  being  checked  in  the  model. 

Value:  SOLDIER  =  PERSPTR(  NAME  (PERSON)  ) 


GLOBAL  VARIABLES  REAL 


DT.OHC  (3-D) 


This  array  holds  the  probability  distribution 
used  to  determine  the  time  required  to  reach 
or  create  overhead  cover.  The  temper arv 
variable  T.OHC.D  drawn  from  it  is  added  to 
T.CHEMCURR  to  yield  the  time  that  ths  collec¬ 
tive  protection  was  reached  (T.CP)  or  the 
time  at  which  the  overhead  cover  was 
completely  over  the  body  (T.OKC)  . 

Dimensions:  N.SIDE  by  3 

V  Si  U  0  S  ! 

1st  dimension:  The  side  of  the  PERSON 
2nd  dimension: 

1  -  The  distribution  type 

2  -  The  first  parameter  of  the  distribu¬ 

tion 

3  -  The  second  parameter  of  the  distri¬ 

bution 


PC.ACT.OHC  (2-D) 


This  array  provides  the  probabilities  that  an 
individual  will  choose  a  particular  one  of 
three  alternative  actions  in  seeking  or 
creating  overhead  cover.  A  uniform  (0,1) 
random  number  is  drawn  and  compared  first  to 
the  first  element  in  the  second  dimension  - 
If  this  number  is  less  than  that  element  of 
PC.ACT.OHC,  the  first  action  is  chosen  (enter 
a  vehicle).  If  the  number  is  areater  than  or 
equal  to  the  first  element,  but  less  than  the 
second  element  of  the  second  dimension,  the 
second  action  will  be  chosen  (enter  a 
bunker).  Otherwise,  the  third  action  is 
chosen  (create  temporary  overhead  cover)  . 
Dimensions:  N.SIDE  by  2 


Values: 

1st  dimension:  The  number  of  the  side  the 
PERSON  is  on 
2nd  dimension: 

1  -  The  probability  of  choosina  action 

number  1 

2  -  The  probailitv  of  choosing  action 

number  2,  added  to  the  first  prcb- 
ab ility 


T.CHEMCURR 


This  variable  serves  as  a  counter  that  keeps 
track  of  the  tine  at  which  the  last  action 
performed  or  scheduled  to  be  performed  bv  the 
PERSON  was  completed. 


UETR  (1-D) 


This  array  is  used  as  a  convenience  to  call 
for  a  uniform  (0,1)  random  number. 

Dimension:  3 
Values: 

1  -  2  (the  uniform  distrtbu  ri:  r.j 
2-0  (the  first  parameter) 

3  -  I  (the  second  parameter) 


RECURSIVE  VARIABLES  REAL 


T.OHC.  D 


This  variable  is  assigned  the  vain 3  for  the 
time  it  takes  to  seek  or  create  overhead 
cover,  as  drawn  from  the  distribution,  D.OHC. 


01;  U2 


These  variables  are  used  to  store  uniform 
(0,1)  random  numbers. 


ERIE?  EXPLANATION  OF  CODE 


LINES  5-6 


Checks  to  see  if  the  parson  is  under  overhead 
cover  -  T.OHC,  the  time  that  overhead  cover 
was  assumed,  is  not  equal  to  zero,  and/or  the 
collective  protection  attribute  CP  is  equal 
to  1,  2,  or  3. 
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LINE  7 


Checks  to  see  if  the  PERSON  is  in  CHEMSIT  2. 
Because  this  was  defined  as  an  area  without 
ant  airborne  hazard,  the  liklihood  of  seeking 
overhead  cover  is  virtually  nil. 


LINES  3-10 


If  the  person  is  net  presently  under  overhead 
cover,  the  probability  that  he  will  seek 
overhead  cover,  PROB,  is  compared  tc  a  random 
uniform  (0,1)  number  as  before.  PRCB  is  an 
argument  passed  to  it  by  the  calling  routine. 
In  all  cases  except  when  the  OHC  routine  has 
been  called  by  the  routine  DECON2,  this  vari¬ 
able  will  be  equal  to  a  global  variable 
PC. OHC.  PC. OHC  is  a  user-supolied  global 
variable  that  sets  the  probability  that  a 
PERSON  who  has  been  directly  attacked  by  a 
chemical  agent  (CHZHSIT  =  1).  or  is  receiving 
indirect  tire  and  is  assumina  it  is  a  chem¬ 
ical  agent,  will  assume  that  the  threat  ocsed 
is  a  persistent  agent  and  that  in  doinq  so, 
will  seek  overhead  cover. 


LINES  11-16 


PC. ACT. OHC,  the  N.SIDE  X  2  array  contains  the 
probability  of  going  into  a  vehicle 
■(PC.  ACT.OHC  (SIDE,  1)  f  and  the  probability  of 
going  into  a  bunker  ( PC.  act . 0HC'(SIDE,  2) )  for 
each  side.  The  probability  of  creating 
temporary  overhead  cover  is  one  minus  the  sum 
of  the  other  two.  These  probabilities  are 
compared  tc  a  uniform  (3,1)  random  number  to 
determine  the  action  that  will  be  taken. 


LINES  17  -  22;  23  -  28;  29  -  31 


The  time  reauired  to  assume  that  overhead 
cover,  given 'the  action  taken,  is  found  from 
the  N.SIDE  X  3  X  3  array  DT.OHC.  Th*  value 
drawn  from  DT.OHC  is  assigned  tc  the  tempo¬ 
rary  variable  T.OHC.D,  and  T.CP,  the  time 
that  the  new  CP  category  was  assumed  (when 
applicable)  is  T.OHC.D  +  T.CHEMCURR. 


LINE  33 


In  all  cases  the  time  that  temporary  overhead 
cover  was  created,  T.OHC,  ‘is  T.OHC.D  + 
T.CHEHCURR. 


1  ROUTINE  CHC  GIVFN  F5C3 

2  0  EF INS  U1.  02,  FPOS  AS  0 -DIM ENS IOt) AL ,  HEAL  VARIABLES 

3  PRINT  1  LINE  WITH  PHOB  THUS 
ROUTINE  OHC  CALLED  GIVEN 

4  LIST  CHEH3IT,  T . CHC  (SOL D ISR1  ,  CP(SOLDIER) 

5  IE  T.OHC  (SOLDIER)  IS  NOT  EQUAL  TO  0.  RETURN  "ALREADY  UNDER  CHC 

6  OTHERWISE  IF  C?  (SOLDIER)  IS  LE  3,  RETURN  "UNDER  OHC  IN  CF 

7  OTHERWISE  IF  CHEKSIT  IS  EQUAL  TO  2,  RETURN  "CROSSING 

8  OTHERWISE  LET  U1  =  DISTRIE(  UPTR(*)  )  "A  UNIF(0,1)  PA  NDOH  NO 

9  LIST  U1 .  ERCE 

10  IF  U1  IS  GT  PRCE,  RETURN  "SOLDIER  DOES  NOT  SEEK  OHC 

11  OTHERWISE  LET  U2  =  D ISTR  IE  (  U?TR(*)  ) 

12  LIST  U2 ,  PC. ACT. OHC 

13  IF  U2  IS  LT  FC.  ACT.  OHC  (SICE,  1)  .  GO  TO  A1  "A1  -  GO  TO  VEHICLE 

14  OTHERWISE  IF  U2  IS  LT  PC  .  ACT. OH C (SIDE, 2) 

15  GO  TO  A2  "A2  -  GO  TO  BUNKER 

16  OTHERWISE  GO  TO  A3  "A3  -  CREATE  TEHP  OHC 

17  'll*  LET  T.OHC.D  =  DISTRIB(  DT. OHC ( SIDE, 1 ,*)  ) 

18  PRINT  1  LINE  THUS 

WENT  TO  ACTION  A1  IN  ROUTINE  OHC 

19  LET  CLDC?  =  CF  (SOLDIER) 

20  LET  CP (SOLDIER)  =  2 

21  LET  I. CP  (SOLDIER)  *  T.CHEflCURR  ♦  T.OHC.D 

22  GO  CUT  1 

23  •  A2 '  LET  T.OHC.D  =  CISTaiB(  CT.OHC  ( SIDE,  2,*)  ) 

24  PRINT  1  LINE  THUS 

WENT  TO  ACTION  A2  IN  RCUTIN S  OHC 

25  LET  CLDC?  =  CP  (SOLDIER) 

26  LET  CP (SQICIES)  =  3 

27  LET  I. CP  (SOLDIER)  =  T.CHEECURR  ♦  T.OHC.D 

29  GO  CUT 

29  'A3*  "NOTE  -  OHC  IS  PROVIDED  BY  A1  AND  A2,  AS  WELL  AS  13 

30  PRINT  1  LINE  THUS 

WENT  TO  ACTION  A3  IN  ROUTINE  OHC 

31  LET  T.OHC.D  =  DISTRIB(  DT .OHC (S ID2, 3 , *)  ) 

32  'OUT' 

33  LET  T.OHC  (SCLDIER)  *  T.  CBEHCURR  ♦  T.OHC.D 

34  LIST  T.OHC  (SOLDIER)  ,  OLDCP,  . CP  (SOLD IER)  ,  S. CP.  (SOLDIER) 

35  RETURN 

36  END  "OP  ROUTINE  OHC 


6  .  The  Bout  ine  MOPP 


Purpose : 

1.  Checks  the  levels  of  chemical  protection 
stored  in  the  array  PFA.CHEM,  for  body 
areas  1  through  7,*  and  compares  them  to 
the  levels  of  maximum  protection,  Pr.MAX. 

2.  If  any  of  the  levals'of  protection  have 

associated  times  indicating  that  the 
donning  of  maximum  chemical  protection  is 
scheduled  (by  other  means,  such  as  on 
order)  but  not  yet  completed  (the  time 
that  donning  the  protection  over  area  i 
was  completed,  TA.  PF.CHSM  (i)  ,  is  after  the 
current  simulation  time,  T.CH2MCU3B),  then 
this  scheduled  donnino  is  incorporated 
into  the  currant  MOPP  sequence  by 

assioning  T.CHEMCUR3  the  TA.  PF.CHEM  (iy 
value. 

3.  For  areas  of  the  body  where  the  level  of 
protection  worn  or  scheduled  to  be  worn  is 
not  the  maximum  level  (full  chemical 
protection)  ,  the  routine  draws  the  time  it 
would  take  to  cion  the  item  from  the 
distribution  array  DT . ?  ?,  schedules  th  - 
time  that  the  donning  would  be  complete, 
TA  .  PF. CHS M (i) ,  updates  the  current  time 
for  that  PERSON'S  activities,  T.CHEMCUER, 
and  assigns  the  maximum  ?F  level  tc  the 
aocrooriate  FF.CHEM  attribute. 

4.  Determines  if  each  item  of  protective 
clothing  or  gear  will  leak;  it*  it  will, 
assians  a  .  leakage  factor  to  the  array 
p?  a.  Leak. 


RCOIINES  CALLED  BY  MOPP 


MASKING 


TEMPORARY  ATTRIBUTES  INTEGER 


VEK.  SYS.  TYPE 


This  attribute,  along  with  VEH.WPN. TYPE ,  is 
used  tc  identify  a  particular  vehicle  type, 
value:  As  given  above 


VEH.  WPN.TYFE 


This  attribute,  along  with  VEH.  SYS.  TYPE  , 
used  to  identify  a  particular  vehicle  hype. 
Value:  As  given  above 


is 


TEMPORARY  ATTRIBUTES 


REAL 


T.MASK 


This  attribute  stores  the  time  at 
PERSON  finished  donning  his  prctec 
Value:  The  time  as  given  above 


which  the 
ve  mask. 


GLOEAL  V  API AELES 


INTEGER 


SIDE 


This  variable  is  used  to  store  the 
the  side  the  PERSON  is  on.  If  the 
COLOR  is  used,  SIDE  =  COLOR  (PERSON) 
Value:  COLOR  (PERSON)  +  1 


value  of 
attribute 

+  1 


SOLDIER 


This  variable  is  used  to  conveniently  refer 
to  the  memory  location  of  the  PERSON  which  is 
currently  being  checked  in  the  model, 
value:  SOLDIER  *  PERSPTR(  NAME  (PERSON)  ) 


GICEAL  VARIAELES 


REAL 


D.PF.LEAK  (3-D) 


This  array  provides  the  probability  distribu¬ 
tion  for  aeterminina  the  amount  of  leakaqe  to 
liquid  agents  found  in  the  items  of  Drct ac¬ 
tive  clothing  that  cover  the  seven  body 
areas.  The  array  elements  PFA.LEAK  are  drawn 
from  the  distribution. 

Dimensions:  7  (the  number  of  body  areas)  by  3 
Values: 

1  -  The  distribution  type 

2  -  The  first  parameter' of  the  distribution 

3  -  The  second  parameter  of  the  distribution 


DT.PF 


(4-D) 


r* 


This  array  holds  the  probability  distribution 
used  to  determine  the  time  required  to  don  a 

?iven  item  of  chemical  protective  clothing, 
or  each  body  area.  The  temporary  variable 
T.PF.D  is  drawn  from  the  distribution;  when 
added  to  T.CHEMCURR,  this  yields  the  time  at 
which  the  clothing  was  donned,  TA .  ?F. CHEM  (i) 
for  body  area  i. 

Dimensions:  N.SIDE  by  3 
V  alues : 

1st  dimension:  The  side  of  the  PERSON 
2nd  dimension: 

1  -  The  distribution  type 


LI 


ft 


bution 


PC. PF. LEAK  (2-D) 


This  array  gives  the  probabiliny  char  the 
item  cf  full  chemical  Drotecrion  covering  a 

?iven  body  area  will  leak  with  rescect  to 
iguid  agents.  This  leakage  may  be  caused  by 
tears,  combat  damage,  improper  fitting  or 
dcnnir.g,  some  agent  being  trapped  under  th° 
garment  from  inadequate  or  nc  decontamina¬ 
tion.  If  the  item  will  leak,  the  leakage 
amount  is  drawn  from  D ,?F. LEAK . 

Dimension:  N.SIDE  by  7 
Values: 

1st  dimension:  The  side  that  the  PERSON  is  on 
2nd  dimension:  The  probability  as  aiver.  above 
for  the  body  area  1  thru  7 


PF.KAX  (2-D) 


This  array  provides  the  protection  factor  for 
the  item  that  provides  full  chemical  protec¬ 
tion  for  a  given  body  area.  ImDlicitly ,  this 
array  also  defines -the  maximum  protective 
(full  hOPP)  level. 

Dimensions:  N.SIDE  by  7 
Values: 

1st  dimension:  The  side  that  the  PERSON  is  on 
2nd  dimension;  The  Drotsction  factor  fcr  each 
bcdy  area,  as  explained  above 


PFA.  CHZM  (1-D) 


This  array  provides  the  current  protection 
factor  for  each  of  the  seven  body  areas  of 
the  PERSON.  Imtlicitly,  this  array  also 
defines  the  current  Drotective  (NOPP)  level. 


PFA.  LEAK  (1-D) 


2  -  The  first  parameter  of  the  district 

tion 

3  -  The  second  parameter  of  the  distri- 


This  array  provides  the  percentage  leakage 
with  respect  to  liquid  agents  of  the  chemical 
protective  clothing  on  each  of  the  seven  bcdy 
areas  of  the  PERSON.  The  leakage. may  be 
caused  by  tears,  combat  damage,  improper 
fitting  or  donning,  some  agent  being  traoped 
under  the  garment  from  inadequate  or  no 
decontamination.  The  determination  of 
whether  or  not  the  item  would  leak  was  accom- 

flished  through  a  comparison  to  PC. PF.  LEAK. 

f  the  item  will  leak,  the  PFA. LEAK  value  is 
drawn  from  D.PF.LEAK. 

Dimension:  7 
Values: 

0  -  If  the  item  does  not  leak 


A  fraction  between  0  and  1  if  the  its  a  fees 
leak 


T.CHEMCURR 


This  variable  serves  as  a  counter  that  keeps 
track  cf  the  time  at  which  the  last  action 
performed  or  scheduled  to  be  performed  by  the 
PERSON  was  completed. 


TA.PF.  CHEM  (1-D) 


This  array  provides  the  time  that  the  current 
level  of  individual  chemical  protection  was 
donned,  for  each  body  area.  The  pointer  to 
this  array  is  stored  in  the  attribute 
T.PP. CHEM. 


OPTS  (1-D) 


This  arra v  is  used  as  a  convenience 
for  a  uniform  (0,1)  random  number. 
Dimension:  3 
Values: 

1- 2  (the  uniform  distribution) 

2- 0  (the  first  Darameter) 

3  -  1  (the  second*  parameter) 


RECURSIVE  VARIABLES  REAL 


T  .  FF  .  D 


This  variable  is  used  to  store  the  time  it 
takes  to  don  an  item  of  full  chemical  protec¬ 
tive  clothing  (as  defined  by  PF.KAX)  over  a 

given  body  area.  It  is  drawn  from  the  distri- 
ution  DT.PF. 


u 


This  variable  is  used  to  store  a  uniform 
(0,1)  random  number. 


BRIEF  EXPLANATION  OF  CODE: 


LINE  5 


If  the  PERSON  is  currently  wearing  an  item  of 
full  chemical  protection  (e.g.,  the  protec¬ 
tive  mask,  which  will  protect  body  area  2)  , 
then  the  routine  checks  to  see  if  the  donning 
of  this  item  has  been  completed  or  is  sched¬ 
uled  tc  be  completed  at  some  time  after  the 
individual’s  current  simulation  time. 
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LINE  6 


I 

■3 


T.CHEMCURR.  If  the  item  has  already  been 
denned,  then  the  routine  will  Iood  to  the 
next  tody  area  in  numerical  order  *( which  is 
also  the  looical  donning  order,  by  design)  . 


tv 


k: 


For  each  area  of  the  body  which  has  net  yet 
been  afforded  full  protection,  the  routine 
enters  the  array  DT.PF  to  obtain  the  appro¬ 
priate  distribution  from  which  to  draw  the 
time  it  took  to  don  that  particular  item  of 
protective  clothing,  and  assigns  that  value 
to  T.  PF.D. 


LINES  7-9 


The  values  in  TA . PF . CHEM ,  PFA.CHEM,  ana 

T.CHEMCURR  are  updated. 


LINES  10  -  -12 


If  the  protective  mask  was  denned  (body  area 
2),  in  addition  to  assigning  values  to 
T  A.  PF  .  CHE  M  ( 2  )  ,  PF  A  .CHEM  <  2)  ,  and  PF  A  .  LEAK  (2)  , 
the  routine  will  update  the  values  for 
T.MASK,  MASK,  and  HASKLEAK  by  calling  the 
MASKING  routine.  T.MASX  will  be  the  same  time 
as  TA.PF.CHEM  (2) ,  assigned  in  line  7. 


K 


L— . 


LINES  14  -  18 


If  an  item  cf  protective  clothing  has  been 
donned  at  this  time,  the  routine  will  check 
to  see  if  this  item  of  gear  will  leak  due  to 
tears,  combat  damage,  improper  donnina  or 
fit,  agent  trapped  under  the  clothing,  etc. 
It  dees  this  by  comparing  a  uniform  (0,1) 
random  number  to  the  probability  that  a  given 
item  cf  full  chemical  Drotectior.  over  body 
area  i  will  leak,  PFA.LSAK(i).  If  it  will, 
the  amount  of  leakage,  expressed  as  a 
percentage  of  the  deposition  on  the  outside 
of  the  garment,  is  drawn  from  the  distribu¬ 
tion  D.PF.LEAK.  This  value  is  assigned  to 
the  array  PF  A. LEAK  . 


►* 


r« 


LINES  19  -  20 


If  the  item  is  scheduled  to  be  donned,  then 
this  scheduling  is  worked  into  the  current 
schedule  by  assigning  T.CHEMCURR  the  time  at 
which  that  scheduled  action  will  be 
completed,  before  moving  on  to  the  next  bedy 
area . 


t  • 
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ip 
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IIUE  24 


If  all  items  of  the  body  have  beer,  orote 
the  routine  will  return  to  The  ca 
routine.  Note  that  T.CHEacURR  has 
uDdatea  in  cases  where  the  individual  has 
been  scheduled,  but  has  not  yet  completed, 
donning  full  protection. 


CODE 


1  ROUTINE  flOPP 

2  DEFINE  T.PF.D,  0  AS  0-DI MENSION AL,  HEAL  VARIABLES 

3  PRINT  1  LINE  THUS 
ROUTINE  MOPP  CALLED 


4 

5 

6 

7 

8 
9 

10 
1 1 
12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 


DO 


FOR  I  *  1  TO  7, 

IF  PFA. CHE M  (I)  IS  NOT  EQUAL  TO  PP. MAX (SIDE, I) 

LET  T.PF.D  =  DISTRIBj  DT.  P? (VEH .SYS . TYPE ,  VEH.  WPN. TYPE,  I, *)  ) 

r  c *r*  *  r.o  ru?M  tr  \  *n  li  o  pril o  n  a.  ip  no  n 


END 


LET  TA.FF.CHEM  (I)  *  T.CHEMCURR  ♦  T.PF.D 

LET  T.CHEMCURR  =  TA. PF.CH EH (I) 

LET  PFA.CFEM (I)  =  FF.M AX (SIDE, I) 

IP  I  =  2  * ’BASK  DC  NNED 

CALL  MASKING 

_LEI  T.  BASK  (SOLDIER)  =  TA.  PF. CHER  (2) 

JLST  U  =  DISIRI3  (  UPTH ( *)  ) 

LIST  U,  PC. PF. LEAK7SIDE, li ,  I 
IF  U  IS  LE  PC. PF.LEAK(SIDE.I) 

LET  PFA.  LEAK  (I)  *  DISTRI8<  D.  PF.  LEAK  (SIDE,  I,  *)  ) 
ALWAYS  REGARDLESS 

ELSE  IF  TA.PF .CHEM(I)  IS  GE  T. CHEMCURE 
LET  T.CHEMCORP.  *  T  A.  PP.CH  EM  (I)  ALWAYS 
REGARDLESS  LIST  I,  T.PF.D 
LOOP 

LIST  TA.PF. CBEM,  PFA. LEAK 
RETURN  . 

"OF  ROUTINE  HOPP 


r-' 

Mf 

tv 

>*v 


r- . 

k*. . 
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The  Routine  CECON 


1.  Separates  out  the  case  of  immediate  decon¬ 
tamination  after  initial  detection  of  the 
chemical  aaent  hazard  from  the  case  of 
delayed  decontamination  after  the  apoear- 
ance  of  symptoms  of  chemical  agent 

Poisoning. 

or  immediate  decontamination: 
a.  Determines  if  decontamination  will 
occur  using  the  parameter 

pc. i aa. decon. 

t.  If  decontamination  dees  net  occur, 
checks  to  see  if  any  body  area  with 
less  than  the  maximum  level  of  chem¬ 
ical  protection  was  contaminated.  If 
so,  sets  a  PFA.  LEAK  value  to  account 
for  agent  trapped  under  the  protec¬ 
tive  garment. 

c.  If  decontamination  does  occur,  sched¬ 
ules  decontamination  of  the  skin 
first,  then  clothing  second,  through 
calls  to  routine  DEC0V2.  The  *in>  = 
required  to  decontaminate,  multiple 
agents  on  the  sxm,  11  aDOxicacie,  is 
added  to  the  time  required  to  decon¬ 
taminate  one  agent  usma  a  multiplier 
AG. M OLT. DECON . 

3.  For  delayed  decontamination: 

a.  Schedules  decontamination  of  all  body 
areas  through  calls  to  DECON2. 
b.  Adds  the  time  Required  to  remove 
items  of  protective  clothing  before 
decontaminating  by  dcublita  the 
donning  time. 

4.  Determines  if  the  protective  mask  will 
leak  using  the  parameter  PC. HSKLEAK.  If  it 
vill,  sets  a  value  on  the  attribute 
MASKLEAK. 

5.  Calculates  the  total  dose  received  during 
decontamination  for  each  body  area  by 
calling  the  routine  DECON2 ,  then  summing 
across  all  body  areas  to  qive  the  total 
dosage  for  each  agent. 

6.  If  the  decontamination  period  extends 
beyond  T. CURRENT,  then  the  average  dcse 
that  would  be  received  during  eacn  DELT 
period  from  the  current  time  (T. CHEMCURR) 
until  the  time  decontamination  is  complete 
(T.  CECON)  and  assigns  this  average  DELT 
aose  to  the  array  AGA .  DECON .  DOSE  whose 
pointer  is  stored  in  the  attribute 
AG. CECON. DOSE. 


ROUTINES  CALLED  BY  DECCN 


CEC0N2 

DEPOSITION 
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LABELS 


DECON. NOW 

DELAYED 

OUT 


TEMPORARY  ATTRIBUTES  REAL 


MASKLEAK 


This  attribute  indicates  the  amount  of 
leakage  (if  any)  that  the  mask  will  leak  to 
vapors  and  aerosols.  It  is  multiplied  by  the 
ouside  concentration  of  agent  at  the  PERSON'S 
location,  DEP.A.CORR,  to  yield  tne  effective 
concentration  of  agent  inside  the  mask.  The 
value  is  drawn  from  the  distribution 
D .MSKLEAK 
V  alu  es : 

0  -  If  the  mask  does  not  leak 
A  fraction  between  0  and  1  if  the  mask  dees 
leak 


T.  CSCCH 


This  attribute  gives  the  time  at  which  the 
orocess  of  decontamination  was  comDleted,  to 
include  the  donning  of  full  chemical  urctec- 
tion  after  decontamination. 

Value:  The  time  as  given  above 


GLOEAL  VARIAELES 


INTEGER 


CKEMSIT 


This  variable  indicates  the  current  situation 
facing  the  PERSON  during  this  iteration.  The 
value  is  determined  by  CHEM. CHECK  at  the 
beginning  of  the  iteration  ever  this  PERSON. 
Values: 

0  -  The  PERSON  is  stationary  and  has  not  been 
directly  attacked  by  (in  the  immediate 
effects  ellipse  of)  a  chemical  agent 
munitio  n 

1  *  The  PERSON  is  m  the  immediate  effects 

ellipse  of  a  chemical  aaent  munition.  He 
may  be  stationary  or  moving 

2  *  The  PERSON  is  moving  in  an  area  of  orevi- 

cusly  deposited  contamination.  There  is 
nc  airborne  agent  present 

3  -  The  PERSON  is  moving  in  an  area  where 

there  is  still  agent  in  the  air  (it  has 
net  all  deposited  on  the  a  round)  ,  and 
has  not  been  directly  attacked  by  a 
chemical  munition 


N.  AGENT 


This  variable  gives  the  maximum  number  of 
agents  that  will  be  used  in  a  aiven  scenario. 
Value:  As  given  above 


SIDS 


This  variable  is  used  to  store  the  value  of 
the  side  the  PERSON  is  on.  If  the  attribute 
COLOR  is  used,  SIDS  =  COLOR  (PERSON)  +  1 
Value:  COLOR  (PERSON)  +  1 


SOLDIER 


This  variable  is  used  to  conveniently  refer 
to  the  memory  location  of  the  PERSON  which  is 
currently  being  checked  in  the  model. 

Value:  SOLDIER  =  PERS?T3(  NAUE  (PERSON)  ) 


GLOBAL  VARIABLES 


REAL 


AGA.CUMDOSE  (1-D) 


This  array  holds  the  accumulated  IV  dcsaqe 
for  each  aaent. 

Dimension  :  'N  .  AGENT 

Value:  The  dosage  in  mg  accumulated  up  tc  the 
current  time 


AGA.  DECON.  ECSE  (1-D) 


This  array  holds  the  averaae  dosage  for  each 
agent,  in  mg,  that  the  PERSON  will  receive 
during  each  DELT  interval  while  he  is 
performing  decontamination.  It  is  used  to 
increment  the  accumulated  dosage  array 
AGA.COMDOSE  for  every  DELT  interval  during 
which  the  PERSON  is  performing  decontamina¬ 
tion  . 

Dimension:  N. AGENT 

Value:  A  dosage  in  mg,  which  is  the  total 
dose  received  during  decontamination  divided 
by  the  number  of  DELT  intervals  it  takes  to 
perform  the  decontamination. 


D.MSKLEAK  (2-D) 


This  array  provides  the  probability  distribu¬ 
tion  for  the  leakage  of  the  protective  mask. 
The  variable  HASKLEAK,  the  percentage  of 
leakace  of  the  mask  to  vapors,  is  drawn  from 
it  using  the  function  DIStRIB 
Dimensions:  N.SIDE  by  3 
Values: 

1  -  The  distribution  type 

2  -  The  first  parameter  of  the  distribution 

3  -  The  second  parameter  of  the  distribution 
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D.  FF.LEAK 


(3-D) 


This  array  provides  the  probability  distritu- 
t ion  for  determining  the  amount  of  leakage  to 
liquid  aaents  found  in  the  items  of  nrctec- 
tive  clothing  than  cover  the  seven  body 
areas.  The  array  elements  PFA .LEAK  are  drawn 
from  the  distribution. 

Dimensions:  7  (the  number  of  body  areas)  bv  3 
Values: 

1  -  The  distribution  type 

2  -  The  first  parameter  of  the  distribution 

3  -  The  second  parameter  of  the  distribution 


DELT 


The  variable  DELT  is  a  user- supplied  param¬ 
eter  that  gives  tie  time  interval  between 
iterations  of  CHEM. CHECK.  It  is  recommended 
that  this  interval  be  on  the  order  of  10 
seconds  in  length. 


a  IN.  G.  CHEM 


(1-D) 


This  array  provides  the  minimum  significant 
level  of  ground  deposition  for  each  agent. 
If  the  deposition  is  below  this  value,  it  is 
treated  as  if  there  were  no  agent  present. 
Dimension:  N. AGENT 

Values:  The  minimum  significant  deposition 
for  each  agent 


PC. DEL  .DECCN  (1-D) 


This  array  provides  the  probabilities  of 
chocsina  to  decontaminate  arfer  symptoms  of 
chemical  agent  poisoning  have  appeared.  If 
decontamination  is  chosen,  it  will  consist  of 
removing  all  clothing  and  gear,  decontami¬ 
nating  the  entire  body,  and  replacing  the 
clothing  with  full  chemical  protective 
clothing.  This  option  is  offered  when  the 
routine  DECCN  is  called  from  the  routine 
SYMPT CM.  DETECT. 

Dimension:  N.SIDE 

Values:  The  probability  of  performing  delayed 
dacontaminat ion 


PC.  IMM.  DECCN  (1-D) 


This  array  provides  the  probabilities  of 
choosing  to  decontaminate  immediately  after 
discovering  the  presence  of  a  chemical  agent 
hazard.  This  is  prior  to  any  verification 
that  th<?  hazard  in  fact  does  exist.  If 
decontamination  is  chosen,  it  will  consist  of 
first  decontaminating  exposed  skin,  then  any 
clothing  that  is  not  chemical  protective. 
After  decontamination  has  been  completed,  all 
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areas  cf  the  body  will  be  covered  fcy  rull 
chemical  protective  clothing.  This  option  is 
offered  when  the  routine  DECON  is  called 
immediately  after  detection  occurs. 

Dimension:  N.SIDE 

Values:  The  probability  of  performing  imme¬ 
diate  decontamination 


PC. MS  KLEAK  (1-D) 


This  array  contains  the  probability  that  a 
protective  mask  will  leak  with  respect  to 
vapors  and  aerosols  as  a  result  of  tears, 
combat  damage,  improper  fitting  cr  donning, 
etc.  If  the  mask  will  leak,  the  leakage 
amount  is  drawn  from  D.MSKLEAK. 

Dimension:  N.SIDE 

Values:  The  crcbability  as  given  above 


PC. PF.  LEAK  (2-D) 


This  array  gives  the  probability  that  the 
item  cf  fui-L  chemical  protection  covering  a 
civen  body  area  will  leak  with  resnect  'to 
liquid  agents.  This  leakage  may  be  caused  by 
tears,  combat  damage,  improper  fitting  or 
donning,  some  agent  being  trapped  under  the 
garment  from  inadequate  or  no  decontamina¬ 
tion.  If  the  item  will  leak,  the  leakage 
amount  is  drawn  from  D  .PF  .LEAK  . 

Dimension:  N.SIDE  by  7 
v  alues : 

1st  dimension:  The  side  that  the  PEHSCIT  is  or. 
2nd  dimension:  The  probability  as  given  above 
for  the  body  area  1  thru  7 


PF  .fl  AX  (2-D) 


This  array  provides  the  protection  factor  for 
the  item  that  provides  rull  chemical  protec¬ 
tion  fcr  a  given  body  area.  Implicitly,  this 
array  also  defines  the  maximum  protective 
(full  MQPP)  level. 

Dimensions:  N.SIDE  by  7 
Values: 

1st  dimension:  The  side  that  the  PERSON  is  on 
2nd  dimension:  The  protection  factor  for  each 
body  area,  as  explained  above 


PrA.  CHEH  (1-D) 


This  array  provides  the  current  protection 
factor  for  each  of  the  seven  body  areas  of 
the  PERSON.  Implicitly ,  this  array  also 
defines  the  current  protective  (MOPP)  level. 


PFA.  LEAK 


(1-D) 


This  array  provides  the  percentage  leakage 
with  respect  to  liquid  agents  of  the  che meal 
protective  clothing  on  each  of  the  seven  bedv 
areas  of  the  PERSON.  The  leakage  may  be 
caused  by  tears,  combat  damage,  improper 
fitting  or  donning,  some  agent  berng  crapped 
under  t^e  garment  from  inadequate  or  no 
decontamination.  The  determination  of 

whether  or  not  the  item  would  leak  was  accom- 

flished  through  a  comDarison  to  PC. 2F.  LEAK. 

f  the  item  will  leak,'  the  PFA.  LEAK  value  is 
drawn  from  D.PF.LEAK. 

Dimension:  7 
V  al  u  e  s : 

0  -  If  the  item  does  not  leak 
A  fraction  between  0  and  1  if  the  item  dees 
leak 


T.CHEMCURR 


This  variable  serves  as  a  counter  that  keens 
track  cf  the  time  at  which  the  last  action 
performed  or  scheduled  to  be  performed  bv  the 
PERSON  was  completed. 


T. CURRENT 


This  variable  gives  the  current  simulation 
time  within  the  main  combat  model  callino  the 
chemical  effects  routines. 

Value:  The  time  as  given  above 


TA.PF.CHEM  (1-D) 


This  array  provides  the  time  that  the  current 
level  of  individual  cnemical  protection  was 
denned,  for  each  body  area. 


TA. IMPAIR  (1-D) 


This  array  provides  the  time  at  which  the 
impairment  dose  threshold  was  reached  for 
each  agent. 

Dimension:  N. AGENT 
Values: 

0  -  if  the  impairment  dose  threshold  has  not 
been  met 

The  time  as  given  above  if  the  impairment 
dose  threshold  has  been  reached 


This  variable  gives  the  simulation  time 
within  the  main  combat  model  at  the  time  of 
the  last  iteration. 

Value:  The  time  as  given  above 


This  array  is  used  as  a  convenience  :o  call 
for  a  uniform  (0,1)  random  number. 

Dimension:  3 
V  si  U  S  S  • 

1  -  2  (the  uniform  distribution) 

2- 0  (the  first  parameter) 

3- 1  (the  second  parameter) 


RECURSIVE  VARIABLES  INTEGER 


This  variable  is  used  to  pass  the  agent  type 
as  an  arguement  to  the  routine  DEPOSITION. 
Value:  AG  =  the  iteration  index  j  (the  agent 
type  under  consideration) 


BODY. AREA 


This  variable  is  used  to  pass  the  area  of  the 
body  as  an  arguement  to  tne  routine  DECON2 . 
Value:  30 DY.  AREA  =  the  iteration  index  i  (the 
body  area  under  consideration) 


C  CUT  AM 


This  variable  is  used  as  a  flag 
if  there  is  agent  present  on  the 
V  al  u  e  s : 

0  -  if  there  is  no  contamination 
1  -  if  there  is  contamination 


to  determine 
skin. 


FLAG 


This  variable  is  used  as  a  flag  to  determine 
if  symptoms  have  occurred  as  a  result  of  the 
accumulated  dosaae  for  any  agent.  This  is 
equivalent  to  checking  to  see  if  TA.  IMPAIR  (j) 
is  not  equal  tc  zero  for  any  agent  type  j. 


RECURSIVE  VARIABLES  REAL 


EECON.  DOS  E  (  1-D) 


This  array  is  used  to  accumulate  the  dosages 
accrued  for  each  agent  type  j  during  the 
decontamination  process,  as  computed  in  the 
routine  DEC0N2.  It  is  the  sum  over  the  body 
area  i  of  all  dosages  (i,j). 

Dimension:  N. AGENT 

Value:  The  sum  over  i  of  the  array  DOSE  (i,  j)  . 


DEP  (1-D) 


228 


This  array  is  used  zo  store  the  deposition  on 
the  ground  and  the  concentration  m  the  air 
of  the  agent  type  passed  as  an  argument,  at 
the  time  that  decontamination  commenced. 
Dimension:  2 
Value : 

1  -  The  deposition  for  the  agent  on  the 

ground. 

2  -  The  cone entration  for  the  aqent  in  the 

air  (not  used). 


DEPOS  (1-D) 


This  array  is  used  to  store  the  deposition  of 
each  agent  type  on  the  skin  at  the  time  that 
decontamination  commenced.  This  information 
is  passed  back  to  the  routine  from  the 
routine  DEPOSITION  m  the  first  value  of  the 
vector  DEPOS  . 

Dimension:  N.  AGENT 

Value:  The  deposition  for  each  agent  as  indi¬ 
cated  a  bove. 


DCSE 


(2-D) 


This  array  is  used  tc  store  the  incremental 
dosages  received  during  the  decontamination 
process,  by  agent  and  by  body  area. 
Dimensions:  7  by  N. AGENT 
Value  s: 

1st  dimension:  The  body  area  concerned. 

2nd  dimension:  The  dosage  received  for  each 
agent  over  the  body  area  concerned. 


DCSE2PASS  (1-D) 


This  array  is  used  an  an  argument  tc  pass  the 
dosages  received  for  each  agent  over  a  given 
body  area  during  the  decontamination  process. 
It  is  an  arguement  for  the  routine  DEC0N2. 
Dimension:  n. AGENT 

Values:  The  dosaae  of  each  aaent  received,  as 
indicated  above 


T .  PF .  D 


This  variable  is  used  as  an 
the  time  it  took  to  don  the 
protective  clothing  over  bod 
routine  DEC0N2.  it  is  use 
decontamination  sequence 
removal  times. 


argument  to  pass 
item  of  chemical 
y  area  i  from  the 
a  in  the  delayed 
to  adjust  for 


TEMP 


This  variable  is  used  as  a  temporary  summa¬ 
tion  variable  to  sum  the  dosages  in  D0SE(i,j) 
over  the  index  i  (body  area). 
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a  1 ;  U2;  0  3;  04 

These  variables  are  used  to  store 
(0,1)  random  numbers. 

A  BRIEF  EXPLANATION  OF  CODE; 

LINES  12  -  19 


The  deposition  on  the  PERSON  is  assumed  to  be 
the  linearly  interpolated  value  between  his 
old  deposition  DEP.  G.OLD  and  his  current 
deposition  DEP.S.CURR.  This  is  found  by 
calling  the  routine  DEPOSITION  with  both  the 
start  and  and  times  agual  to  the  current 
simulation  time  T.CHEMCURR.  CO  NT  AN  is  used  to 
indicate  if  an  agent  is  present. 

LINES  18;  22 


The  decision  node  between  immediate 
aalavsd  decontamination  is  the 
T  A.  IN  PAIS .  If  TA.  IMPAIR  is  net  equal  tc 


tion  may  be  per 
determine  if  any 
equal  to  zero. 


zero 
have 
ay  be 
mma- 


TA.  IMPAIR  values 


LINES  23 ; 


When  a  person  discovers  that  he  has  been 
traversing  an  area  contaminated  with  a 
persistent  chemical  agent,  he  will  decontami¬ 
nate  all  exposed  'areas  and  den  full 
protection.  The  probabilities  are  bypassed  in 
this  case  since  it  is  assumed  that  decontami¬ 
nation  will  occur. 


LINES  24  -  21 


If  the  PERSON  has  not  shown  symptoms,  the 
probability  of  his  assuming  that  the  agent  is 
persistent  and  that  he  is  contaminated  is 
expressed  in  the  global  variable 

PC. I MM. DECO N .  If  he  chooses  to  decontami¬ 
nate.  the  routine  proceeds  to  the  label 
"  DECO  N.  NOW". 


shown 


LINE  29 


If  he  chooses  not  to  decontaminate,  then  a 
check  is  made  to  see  if  he  was,  in  fact, 
contaminated.  If  he  wasn't,  no  action  is 
required  and  the  rcuitne  returns  to  the 
calling  program. 


INES  30 


34 


LINES 


LINES 


LINES 


LINES 


LINES 


If  he  was  contaminated,  then  the  values  ir. 
the  array  PFA.LEAK  are  assigned  positive 
values  in  all  cases  where  his  current*  orotec- 
tion  factor  for  body  area  i  (PFA.  CHEW  (i)  )  is 
not  the  protection  factor  belonging  to  the 
maximum  chemical  protection  (PF.MAX(i)), 
reflecting  the  face*  that  he  will  have  agent 
trapped  under  his  protective  garments  when 
he  chooses  to  den  them. 


36  -  53;  54  -  73 


The  exposed  skin  is  decontaminated  first  by 
calling  the  routine  DEC0N2 .  All  areas  that 
were  not  exposed  skin  (PF  =  1)  or  fullv 

protected  (?F  =  PF.MAX)  are  decontaminated 

next  through  a  call  to  routine  DEC0N2. 


39  -  40;  57  -  58 


DECON2  serves  as  a  subroutine  to  actually 
compute  the  decontamination  times  and  dosages 
received  during  that  time  for  each  area'of 
the  body  for  all  agents  present  on  the  skin. 

4  1;  60  ;  84 

for  the 

TV  •  a  <5 

array7 


75  -  98 


The  Q  Z  CON 2  routine  returns  the  dose 
bed v  area  called  for  each  aren't, 
stored  in  a  2-dimensxcnal 

DOSS  (EODY.  A3  EA,  AGENT)  . 


If  the  situation  involved  delayed  decontami¬ 
nation,  then  all  body  areas  are 
decontaminated  regardless  or  the  level  of 
protection  at  the  time  decontamination  is 
performed.  The  times  to  don  the  protective 
garment  are  doubled  to  reflect  the  time  to 
remove  the  old  protective  item  and  decontami¬ 
nate  it,  by  adding  the  donning  time  to  the 
variables  T.  CHEHCURR  and  TA.PF.CHEM. 


42  -  46;  62  -  66;  87  -  91 


If  an  item  of  protective  clothing  has  been 
donned  at  this  time,  the  routine  will  check 
tc  see  if  this  item  of  gear  will  leak  due  to 
tears,  combat  damage,  improper  donning  or 
fit,  agent  trapped  under  the  clothing,  etc. 
It  does  this  by  comparing  a  uniform  (0,1) 
random  number  to  the  probability  that  a  given 
item  of  full  chemical  protection  over  body 
area  i  will  leak,  PF  A .  LEAK  (i)  .  If  it  will. 


i 


* 
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the  amount  of  leakage,  expressed  as  a 
percentage  of  the  deposition  on  the  outside 
of  the  garment,  is  drawn  from  the  distribu¬ 
tion  E.PF.LEAK.  This  value  is  assianed  to 
the  array  PF  A.  LEAK. 


LINES  47  -  52;  67  -  72;  91  -  96 


If  the  protective  mask  was  donned  (body  area 
2\,  in  addition  tc  assigning  values  to 
TA.  PF  .CHEM(2)  ,  PFA.CHEM(2),  and  PF  A.  LEAK  (2)  , 
the  routine  will  update  the  values  for 
T.MASK,  MASK,  and  MA5KLEAK  by  calling  the 
MASKING  routine.  T. MAS K  will  be  the  sane  time 
as  T  A  .  PF.  CHEM  (2)  . 


LINES  10  1  -  110 


Because  the  decontamination  process  is  likely 
to  stretch  out  over  many  iterations  of 
CHEM.  CHECK,  and  because  the  dosage  received 
during  the  time  that  decontamination  is  in 
process  is  a  function  of  the  decontamination 
rate  {the  array  DC.i}  ,  the  dosage  received 
during  the  time  of  decontamination  is 
computed  by  calling  tha  routine  DECON2. 


LINES  10  1  -  105 


The  2-diasns  ional  array  DOSE(i,j)  is  summed 
over  the  body  area  index  i  tc  give  a  whole- 
body  dosage  ror  each  agent  j. 


LINES  106  -  108 


If  the  decontamination  process  stretches  cut 
over  mere  than  one  interval  DELT,  The  average 
dose  for  each  DELT  period  is  computed  and 
stored  in  the  array  AGA. DECON. DOSE.  That 
array  will  be  used  to  update  the  dosage  in 
succeeding  iterations  until  decontamination 
is  complete. 


LINE  109 


If  decontamination  was  completed  befor 
T. CURRENT ,  the  dosage  accumulated  is  added  tc 
AGA.CUMDOSE.  The  remaining  dosage  received 
between  T. DECON  and  T. CURRENT  will  be  calcu¬ 
lated  in  routines  DOS E 1  or  DOS E3. 
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[•It] 


1  ROUTINE  DECON 

2  PRINT  1  LINE  THUS 
SOUTINE  DECON  CALLED 

3  DEFINE  I,  AG,  FLAG,  BO  D  Y . ARE  A  AND  CONTAB  AS  0- DIB ENSION A I , 

4  INTEGER  VARIABLES 

5  DEFINE  T.PF.D,  U1,  U2.U3.U4,  TSBP  AS  0-DIB ENSION AL ,  REAL  VA FIAELES 

6  DEFINE  DECCN. DOSE.  0CSE2PASS,  AND  DEP  AS  1-DIBENS IONAL,  REAL  ARRAYS 

7  DEFINE  DOSE  AS  A  2-0 IHENS ION AL.  REAL  ARSAY 

B  RESERVE  DEPJ*) ,  DEP03J*),  D0SE2 P ASS  (*) ,  jSCON. DOS  E(*)  AS  N. AGENT 

9  RESERVE  DCSE(*,*)  AS  7  3Y  N. AGENT 

10  LET  FLAG  *  0 

11  LET  CONTAB  =  0 

12  FOR  J  =  1  TO  N. AGENT,  DO 

13  LET  AG  =  J 

14  CALL  DEPOSITION  GIVEN  T. CURRENT,  T. CURRENT,  AND  AG 


YIELDING  CEP  <*) 

LET  OEPOS  (J)  =  DE  P ( 1 ) 

17  IF  DEPCS  1  J)  IS  GE  B IN  .  G. C HEB  (J)  .  LET  CONTAB  ■  1 

18  REGARDLESS  IF  TA.IBPAIR<J>  IS  NOT  EQUAL  TO  0,  LET  FLAG  *  1 

19  REGARDLESS  LOCP 
!0  LIST  DEPCS 

21  LIST  FLAG 

>2  IF  FLAG  IS  EQUAL  TO  1,  GC  TO  DELAYED 

23  OTHERWISE  IF  CHEBSIT  =  2,  GO  TO  DECON. NOW 

>4  OTHERWISE  LET  U1  =  DISTRIE(  UPTR(*)  > 

25  LIST  U1,  FC.IBH.DECON(SIDE) 

26  IF  U1  IS  LE  PC.  IBH.  DECON  (SIDE)  ,  GO  TO  DECON.NOW 

27  0  THEPWIS  E 
23  LIST  CONTAB 

29  I?  CCN’TAB  IS  NOT  EQUAL  TO  1,  RETURN 

30  OTHERWISE  FOR  I  *  f  10  7,  DO 

31  IF  PFA.CKEK(I)  IS  NOT  EQUAL  TO  PF . BAX  ( SIDE, I) 

32  LET  PFA.LEAK (I)  =  D 1ST RIB  (  D. PF. L2 A K (S IDE, I,*)  ) 

33  REGARDLESS  LOOP 

34  RETURN 

35  • DECON . NOW '  FSINT  1  LINE  THUS 
REACHED  • DECON. NCW*  IN  DECON  ROUTINE 

36  FOR  I  =  1  70  7.  DO 

37  LET  BODY. AREA  =  I 

38  IF  PFA.CHEB  (I)  -  1 

39  CALL  DEC0N2  GIVEN  BODY. AREA  AND  DEPOS(*) 

10  YIELEING  D0SE2P  ASS (*)  AND  T.PF.D 

«1  POR  J  *  1  TO  N. AGENT,  LET  DOSE (I, J)  =  D0SE2PASSJJ) 

•  2  LET  U4  =  CIST3IB  (  UFTRJ*)  )  • • PF  LEAK 

13  LIST  U4  PC.  PF. LEAK  (SIDE,  lj>  I 

14  IF  U4  IS  LE  PC. PF.  LEAK  (SIDE, I) 

15  LET  FFA.LEAK(I)  *  DISTRI3(  D .PF . LEAK (SIDE, I , •)  ) 

16  REGARDLESS 

17  IF  I  =  2  ’ 'BASK  LEAK 

18  LET  U3  *  DISTRI B  <  UPT5J*)  ) 

»9  LIST  U3,  PC.  BSKLfAK(SIDEj 

50  THEN  IF  U3  IS  LE  PC. BSKLEAK(SIDE) 

51  LET  BAFKLEAK  (SCLDIER)  *  DISTRIB(  D. HSKLEAK (SIDE , *)  ) 

52  REGARDLESS 

53  REGARDLESS  LOCP 

54  FOR  I  =  1  TO  7,  DO 

55  LET  BODY. AREA  =  I 

56  IF  P  F  A .  CHEN  J I)  IS  NOT  EQUAL  TO  PF. BAX J SIDE, I) 

57  CALL  DECON 2  GIVEN  BODY. AREA  AND  DEPOS(*) 

58  YIELDING  D0SS2PASS(*)  AND  T.PF.D 

59  FOR  J  *  1  TO  N. AGENT,  DO 

50  LET  DOSE  ( I  ,J)  =  PFA.CHEB(I)  *  D0SE2PASS  (J) 

51  LOOP 

52  LET  UU  =  DISTRIB  J  UPTRJ*)  )  "PF  LEAK 

63  LIST  U4,  PC.  PF. LEAK  (SIDE,  I) 


LET  CONTAB  »  1 
T  EQUAL  TO  0,  LET  FLAG 


LIST  U4,  PC.  PF  .LEA  K  (SI 
IF  U4  IS  LE  PC.PF. LEAK 
LET  FFA.LEAK(I)  =  D 
REGARDLESS 
IF  I  =  2 


i! 

(SICE,  I) 
ISTRIB  ' 


"PF  LEAK 


LET  U3  *  DIST3IEJ  UPTRJ*) 
LIST  U3,  PC.BSKLEAK  (SI  DS). 

—  T'  PC.flSKLEA 


(  D.PF.  LEAK  (SIDE,  I,*)  ) 
•  ’BASK  LEAK 


REGARDLESS 
REGARDLESS  LCCP 
GO  OUT 


THEN  IF  U 3  IS  LE  PC .BS KLEAK (SIDE) 

LET  B  AS  KLEAK  (SOLDIER)  -  DISTRIB  (  D.BSKLEAK  (SIDE,  *)  ) 


CODE 


75  • DELAYED'  PRINT  1  LINE  THUS 
BEACHED  'DELAYED'  IN  CECCN  SOUTINE 

76  LET  U2  =  DISTBIB  (  UPTR <*)  ) 

77  IF  CHEMSIT  =  2,  LET  U2  =  0 

78  BEG1RDL2SS  LIST  U2,  ?C. D EL. D ECO N  (S IDE) 

79  IF  02  IS  LE  PC.  CEL.  DECON  (SIDE) 

80  FOP.  I  *  1  TC  7.  DO 

81  LET  BODY. AREA  *  I 

82  CALL  CECCN2  GIVEN  EODY.AREA  AND  DEPOS  (*) 

83  YIELDING  DOSE2PASS(*>  AND  T.PF.  D 

84  FOR  J  =  1  TO  N. AGENT,  LET  DOSE  (I, J)  =  DOSE2PASS (J) 

85  LET  TA.PF.CHEB  (I)  *  T.CHEKCUBB  ♦  T.PF.D 

86  LET  T.CHEHCURR  =  T.CHEKCUBB  ♦  T.PF.D 

87  LET  'JU  =  DISTBIB  (  UFTB  (*)  )  "  PF  LEAK 

88  LIST  04,  PC.  PF. LEAK  (SIDE,  il 

89  IF  UU  IS  LE  PC.PF.  LEAK  (SIDE, I) 

90  LET  PFA.LEAK(I)  =  DISTBI3(  D.PP. LEAK (SIDE, I, *) 

91  REGARDLESS  IF  I  >  2 


LET  U3  =  D  1ST RI  E  (  UPTH  (*] 
LIST  03,  PC.HSKIEAK (SIDE 
THEN  IF  U 3  IS  LE  PC.SSKL! 
LET  MASK  LEAK  (SOLDI2B) 
BEGABCLESS 
LOOP 

REG  ABDLSSS 


•  '.BASK  LEAK 


:  (SIDE) 
DISTRI 


3  (  D.  HSKLEAK  (SIDE,*) 


99  'OOT*  LET  T . CECCN (SOLDIER)  =  T.CHEKCOBS 

100  LIST  T. DECCN  (SOLDIER) 

101  FOH  J«1  TO  N. AGENT,  DO 

1C2  LET  TEMP  =  0 

103  :Oi  I  *  1  TO  7,  LET  TEMP'  =  T EBP  ♦  DOSE  (I, J) 

104  LET  CECCN. COSE(J)  =  TEMP 

105  LIST  DECCN. DOSE  (0) 

106  IF  T.  CECCN  (SCLDIERl  IS  GT  T.  CURRENT 

107  LET  AG  A. DECON. DOSE  (jf  -  D  ECO  N.  DOSE  (J)  / 

108  (  (T . DECON (SOLDIER) -TL ) /DELT) 

109  ELSE  LET  AGA . C3MDOSE (J)  *  AG  A. COBDOSE ( J)  *  DECON. DOSE  (J) 

110  REGARDLESS  LOOP 

111  B PTTT P  M  * 

112  END  "OF  ROUTINE  DZCON 


) 
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8.  The  Routine  CEC0N2 


Pur pcs  e : 

1.  Determines  how  many  agents  are  present  cn 
the  skin  apd  clothing  at  the  time  of 
decontamination.  The  routine  draws  the 
time  to  decontaminate  the  first  acrert 
T.DECON.D  from  the  array  DT.DECCN.  If 
multiple  agents  are  present,  it  will 
repeatedly  multiply  MOLT. AG. uECON  times 
T. EECON.D  . 

2.  Computes  the  dosage  received  during  decon¬ 
tamination  for  each  agent  present.  In  the 
case  of  crossing  a  contaminated  area  on 
foot  where  the  PERSON  remains  standing 
prior  to  decontaminating,  the  dose  is 
computed  only  ever  areas  5,  6,  and  7 

3.  Schedules  the  donning  of  protective  gear 
and  assigns  values-  to  the  array 
TA.  FF.CHEM. 


ARGUMENTS 


INTEGER 


AREA 


ARGUMENTS 


REAL 


DEP  (1-D) 

DCSE2P  ASS  (1-D) 

T  .  PF  .  D 


ROUTINES 


DECON. DOSE 
D  1ST  HI  E 
OHC 


LAEELS 


DCN 

DCSECOMP 

NEXT 


TEMPORARY  ATTRIBUTES  INTEGER 


CONTAMINATED 


This  attribute  indicates  if  there  is  -contami¬ 
nation  over  the  entire  surface  of  the  PERSON 
or  his  collective  protection 
Values: 

0  -  No  contamination  ever  all  surfaces 
1  -  Contamination  present  on  all  surfaces 
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CP 


This  attribute  indicates  the  current  level  of 
collective  protection  afforded  the  PERSON 
V  alues : 

1  -  A  vehicle  wirh  an  operating  overpressure 

syst  em 

2  -  A  vehicle  without  an  overpressure  system 

3  -  A  hunker  or  building 

4  -  A  foxhole,  wirh  or  without  temporary 

overhead  cover 

5  -  No  protection  (the  PERSON  is  in  the  open) 


DEFNUH 


This  attribute  gives  the  relative  defilade  of 
the  PERSON  at  any  given  time 
Value  s: 

1  -  in  a  foxhole 

2  -  prone 

3  -  crawling 

4  -  kneeling  or  sitting 

5  -  standing 


7EH.  SYS.  TYPE 


This  attribute,  along  with  VEH. WPN . TYPE ,  is 
used  to  identify  a  particular  vehicle  tyoe. 
value:  As  cxiven  above 


VEH.  WPN.  TYPE 


This  attribute,  along  with  VEH. SYS . TYPE ,  is 
used  to  identify  a  particular  vehicle  type. 
Value:  As  given  above 


TEMPORARY  ATTRIBUTES  REAL 


T.CHC 


This  attribute  provides  the  time  at  which  the 
PERSON  assumed  his  current  ievel  of  collec¬ 
tive  protection,  if  he  went  into  CP  1,  2,  or 
3  during  this  iteration;  otherwise,  it  is  the 
time  that  he  created  temporary  overhead  cover 
in  CP  4  or  5.  It  is  also  used  as  a  check  to 
see  if  temporary  overhead  cover  exists. 

V  alue ; 

0  -  if  no  overhead  cover  exists  (or  the 
PERSON  is  in  CP  1,  2,  or  3 ,  where  it 

automatically  exists) 

The  time  as  given  above,  if  overhead  cover 
exists. 
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GIOEAL  VARIAELES 


INTEGER 


CEEMSIT 


This  variable  indicates  the  current  situation 
facing  the  PERSON  during  this  iteration.  The 
value  is  determined  by  CHEM. CHECK  at  the 
beginning  of  the  iteration  over  this  PERSON. 

V  alues : 

0  -  The  PERSON  is  stationary  and  has  not  been 
directly  attacked  by  (in  the  immediate 
effects  ellipse  of)  a  chemical  agent 
munitio  n 

1  -  The  PERSON  is  in  the  immediate  effects 

ellipse  of  a  chemical  acer.t  munition.  He 
may  be  stationary  or  moving 

2  -  The  PERSON  is  moving  in  an  area  of  previ¬ 

ously  deposited  contamination.  There  is 
no  airborne  aoent  present 

3  -  The  PERSON  is'  moving  in  an  area  wher® 

there  is  still  agent  ir.  the  air  (it  has 
net  ail  deposited  on  the  ground)  ,  and 
has  not  been  directly  attacked  bv  a 
chemical  munition 


N.  AGENT 


This  variable  gives  the  maximum  number  of 
agents  that  will  be  used  in  a  given  scenario. 
Value:  As  ai ven  above 


SIDE 


This  variable  is  used  to  store  the 
the  side  the  PERSON  is  on.  If  the 
COLOR  is  used,  SIDE  =  COLOR  (PERSON) 
Value:  COLOR  (PERSON)  ♦  1 


value  of 
attribute 

+  1 


SOLDIER 


This  variable  is  used  to  conveniently  refer 
to  the  memory  location  of  the  PERSON  which  is 
currently  be ma  checked  in  the  model. 

Value:  SOLDIER'=  PERSPTR  (  NAME  (PERSON)  ) 


GIOEAL  VARIAELES 


REAL 


ET.DECON 


(4-D) 


This  array  provides  a  probability  distribu¬ 
tion  from  which  the  time  it  takes  for 
emergency . im mediate  decontamination  of  skin 
or  clothing  for  each  body  area  is  drawn. 
This  time  does  not  include  the  time  required 
to  don  protetive  clothing  after  decontamina¬ 
tion. 
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Dimensions:  N.SIDE  by  N. AGENT  by  7  body  areas 
by  3 
Value?: 

1st  dimension:  The  side  of  the  PERSON 
2nd  dimension:  The  agent  concerned  (in 

multiple  agent  situations,  a  factor 
MULT . ag . OECON  will  provide  a  wav  of 
adjusting  the  overall  decontamination 
time) 

3rd  dimension:  The  bodv  area  concerned  (1 

through  7) 

4th  dimension: 

1  -  The  distribution  type 

2  -  The  first  oarameter  of  the  distribu- 

ti  on 

3  -  The  second  parameter  of  the  distri¬ 

bution 


DT.PP  ( 4-  D ) 


This  array  holds  the  probability  distribution 
used  to  determine  the  time  required  to  don  a 
given  item  of  chemical  protective  clothing, 
for  each  body  area.  The  temporary  variable 
T.PF.D  is  drawn  from  the  distribution;  when 
added  to  T. C KEi'iCURS,  this  yields  tne  time  at 
which  the  clothing  was  donned,  TA.PF.CHZii  (i) 
for  body  area  i. 

Dimensions:  N.SIDE  by  3 
values: 

1st  dimension:  The  side  of  the  PERSON 
2nd  dimension: 

1  -  The  distribution  type 

2  -  The  first  parameter  of  the  distribu¬ 

tion 

3  -  The  second  parameter  of  the  distri¬ 

bution 


MIN.  G.  CHEM 


(1-D) 


This  array  provides  the  minimum  significant 
level  of  ground  deposition  for  each  aaent. 
If  the  deposition  is  below  this  value,  it  is 
treated  as  if  there  were  nc  agent  present. 
Dimension:  N. AGENT 

Values:  The  minimum  significant  deposition 
for  each  agent 


MOLT.  AG.  DECCN  (1-D) 


This  array  provides  a  means  of  adjusting  the 
time  it  takes  to  decontaminate  a  given  body 
area,  T.  DECON.D,  drawn  from  DT.DECON,  to 
allow  for  the  presence  of  more  than  one  aqent 
on  the  skin.  If  there  is  a  second  agent 

S  resent,  T. DECON.D  will  be  multiplied  by 

OLT. AG. DECO N  to  yield  the  time  required  to 
decontaminate  both  agents  simultaneously . 
If  there  are  three  agents,  T. DECON.D  will  be 
multiplied  by  MULT.AG . DECON  twice;  etc. 
Dimension:  N.  AGENT 
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Vaiue:  The  multiplication  factor  for  that 

agent 


PF.MAX  ( 2  —  D) 


This  array  provides  the  protection  factor  for 
the  item  that  provides  full  chemical  protec¬ 
tion  for  a  given  body  area.  Implicitly,  this 
array  also  defines  the  maximum  protective 
{full  MCPP)  level. 

Dimensions:  N.SIDE  by  7 
Values: 

1st  dimension:  The  side  that  the  PERSON  is  on 
2nd  dimension:  The  protection  factor  for  each 
body  area,  as  explained  above 


PFA.CHEM  { 1-  D) 


This  array  provides  the  current  protection 
factor  for  each  of  the  seven  body  areas  cf 
the  PERSON .  Implicitly ,  this  array  also 
defines  the  current  protective  (MOPP)  level. 


T.CHEKCUBE 


This  variable  serves  as  a  counter  that  keeps 
track  of  the  time  at  which  the  last  action 
performed  cr  scheiulad  to  be  performed  by  the 
PERSON  was  completed. 


TA.PF.CHEM  ( 1-  D) 


This  array  provides  the  time  that  the  current 
level  cf  individual  chemical  protection  was 
denned,  for  each  body  area. 


RECURSIVE  VARIABLES  INTEGER 


AGENT 


This  variable  is  used  to  pass  the  agent  type 
as  an  argument  to  the  routine  DECON.DOSE,  an 
i  iple aentati on  routine  written  to  perform  the 
actual  dosage  calculations. 

Value:  AGENT  *  Tha  iteration  index  j  (the 
aaent  t yoe) . 


FLAG 


This  variable  is  used  as  a  flag  to  determine 
of  there  was  any  agent  deposited  on  the  skin 
at  the  time  that  decontamination  commenced. 
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5EC0SSI  VS  VARIABLES 


REAL 


DCSECP  ASS 


This  variable  is  used  as  an  argument  to  pass 
the  dose  computed  by  the  routine  DECON. DOSE 
back  tc  the  calling  routine. 


T.  CECON.  D 


This  variable  is  used  tc  store  the  time 
required  to  perform  decontamination  cf  a 
given  body  area  for  a  single  agent  (or  as 
adjusted  by  MULT. AG . DECON ,  for  multiple 
a  gents) . 


EflIEF  EXPLANATION  OF  CODE: 


LINES  7-10 


The  calculation 
decontamination 
under  some  type 
mating  so  tnat 
contamination, 
over 
prev 
t  he 
at  1 


neaa  cover 
icusly,  the 
proba  ail  ity 
(certai  nty) 


cf  cue  dosage  received  during 
assumes  that  the  PERSON  is 
of  cover  prior  to  decontami- 
he  will  receive  no  further 
In  order  tc  insure  this,  ir 
was  not  souoht  or  created 
routine  OHC'is  called  with 
of  seeking  overhead  cover  set 


LINES  12  -  19 


Checks  to  see  if  there  are  multiple  agents 
causing  contamination  (or  any  -  it  is 
possible  for  a  person  to  suspect  contamina¬ 
tion  where  none  is  present) .  For  the  first 
agent,  a  time  to  both  decontaminate  the  bcdy 
area  concerned  is  determined  based  on  the 
array  DT.  DECON.  The  time  to  accomplish  the 
decontamination  of  chat  body  area,  T.  CECON. D, 
is  added  to  T. CHEMCURR ,  t.ie  current  simula¬ 
tion  time.  For  multiple  agents, 

MULT.  AG. DECON  multiplies  T. DECON. D  to 
increase  the  total  time  required  to  deconta¬ 
minate. 


LINES  20  -  26 


If  the  body  area  is  less  than  5  and  we  are  in 
the  situation  where  the  PERSON  has  been 
crossing  a  contaminated  area  (CHEMSIT  =  2)  on 
foot  (  CP  =  5  )  ,  is  not  contaminated 

(CONTAMINATED  =  0)  ,  and  has  remained  up  until 
decontamination  was  begun  (  DEFNUM  =5  ), 

then  nc  dosage  is  assessed.  Otherwise,  the 
dosage  accumulated  during  the  decontamination 
of  that  body  area  for  each  agent  is  computed 
in  the  sectioned  labeled  DOSECOMP. 
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LINES  28  -  34 


The  routine  DECON. DOSE  is  called  to  compute 
the  dcsage  received  during  decontaminat ion 
for  a  given  aaent  and  body  area  (the  body 
area  was  supplied  as  an  argument  to  CEC0N2)  . 
The  dose  " is  returned  by  the  arguement 
DOSEC P ASS ,  and  the  array  for  all  aoents  is 
stored  in  a  temporary  variable  D0SE2PASS , 
which  is  passed  back  to  the  routine  DECON  as 
an  argument. 


LINES  35  -  39 


If  decontamination  was  directed  (called  by 
the  routine  DECON)  but  there  was  no  contami¬ 
nation  present  (FLAG  =  0),  decontamination  is 
still  performed  and  T.CHEMCURR  is  updated  by 
a  value  T. DECON. D  drawn  from  the  distribution 
DT. DECCN..NO  dcsaae  is  assessed. 


LINES  41-47 


After  a  body  area  has  been  decontaminated  it 
is  covered  by  a  chemical  orotective  garment 
with  a  protection  factor'  value  ecrual  to 
PF.  MAX  (in  other  words,  full  chemical  “protec¬ 
tion  is  assumed).  To  simulate  this,  a  value 
T.PF.D  representing  the  time  it  takes  to  don 
the  standard  item  of  protective  gear  for  the 
body  area  concerned  is  drawn  from  the  distri¬ 
bution  DT.PF.  This  value  is  added  to 
T.CHENcaRP  to  vield  the  time  that  the  ore *ec- 
tion  was  donned,  TA.  PF. CHEH  (i)  (i  *  the  body 
area)  and  then  T.CHEMCORR  is  updated  to  this 
latest  time.  The  level  of  protection  for  each 
item  is  changed  to  the  level  of  full  protec¬ 
tion  PF.flAX,  as  each  item  is  donned. 


1  ROUTINE  DEC0N2  GIVEN  AREA  AND  CEP  YIELDING  D0SE2P ASS  AND  T.PF.D 

2  PRINT  1  LINE  THUS 

ROUTINE  CECCN2  CALLED 

3  DEFINE  AREA,  AGENT,  J  , F LAG  AS  O-DISENSIONAL,  INTEGER  VARIABLES 

4  DEFINE  T .  DZCCN.  D,  T.PF.D,  DOSECPASS  AS  Q-DISENSIONAL,  REAL  VARIABLE 

5  DEFINE  DEP,  DCSE2P  ASS  AS  1-DIBE NSIONAL,  REAL  ARRAYS 

6  3ESERV2  DEP(*),  DOSE2?ASS(*)  AS  N.  AGENT 

7  IF  CP  (SOLDIER)  IS  GE  4 

8  THEN  IF  T.CHC  (SOLDIER)  IS  EQUAL  TO  0 

9  CALL  CHC  GIVEN  1 

19  REGARDLESS 

11  LET  FLAG  =  0 

12  FOR  J  «  1  10  N. AGENT.  DO 

13  IF  DEF(J)  IS  GE  S  IN  .  G  . CHES  (J  ) 

14  LET  T.DECCN.D  =  DISTRI3(  DT. DECON (S IDE, J , AREA, *)  ) 

15  IF  FLAG  =0 

16  LET  FLAG  =  1 

17  ELSE  LET  T. DECON. D  *  M  ULT .AG. DECON (SIDE)  *  T. DECON. D 

18  REGARDLESS  LET  T. CHEMCURR  x  T. CHEMCURR  ♦  T. DECON. D 

19  LIST  T. DECON. E,  0,  MULT  .  AG .  D  ECON  (SI  D  E) 

20  IF  AREA  IS  LT  5 


THEN  IF  CHEMSIT  IS  EQUAL  TO  2 
THEN  IF  CONTAMINATED  (SOLDIER) 
THEN  IF  C?  (SOLDIER)  IS  EQUAL 


(SOLDIER)  IS  EQUAL  TO  5 

24  THEN  I?  DEFNUB(SCLDIER)  IS  EQUAL  TO  5 

25  LET  DCSE2 PAS  S  ( J)  -  0 

26  GO  TO  N2 IT 

27  REGARDLESS 

23  •  COSECO IIP •  PRINT  1  LINE  THUS 

REACHED  ' CC5ECCS  F  *  IN  ROUTINE  DECON 2 

29  LET  AGENT  *  J 

30  CALL  DECON. DOSE  GIVEN  AREA,  AGENT,  T. DECON. D,  AND  DEP(*) 

31  YIELDING  DOSECPASS 

32  LET  DCSE2FASS(  AGENT)  *  DOSECPASS 

33  LIST  AREA,  AGENT,  DEP(AGENT)  ,  D0SE2 PASS (AGENT) ,  T. DECON. D 

34  REGARDLESS  LCCF 

35  'NEXT'  PRINT  1  LINE  THUS  . 

REACHED  ’NEXT'  IN  5 CUT INS  DECON 2 

36  IF  FLAG  *  0 

37  LET  T.DECCN.D  =  DIS7RIS(  CT.  DECON  (SIDE , 1 , AREA, *)  ) 

38  LET  T. CHEMCURR  *  T. CHEMCURR  ♦  T. DECON. D 

39  REGARDLESS 

40  LIST  T. DECON. D,  AREA.  T.CHESCORR 

41  'DON'  LET7.FF.C  =  CISTRI3(  DT. ? F (V  EH. SIS .TYPE (SOLDIER)  , 

42  VEH.  SEN. IYPE  (SOLDIER)  .AREA,  *)  ) 

43  LET  TA. PF.CHEK(AREA)  *  T.CHESCURR  ♦  T.PF.D 

44  LET  T.CHEHCUEE  =  T A . PF . CH EM ( AR E A) 

45  LET  PFA.CHEfl  (AREA)  *  ?F.  MAX  SI  D  E,  ARE  A) 

46  LIST  T.PF.D,  AREA,  T.CHESCURR 

47  RETURN 

48  END  "OF  ROUTINE  DEC0N2 


IS  EQUAL  TO  0 
TO  5 

EQUAL  TO  5 


The  Routine  DEPOSIT  I  OK 


Purpose: 

1.  Computes  the  ground  and  air  dosaae  at  the 
given  location  of  interest  at  any  interme¬ 
diate  time  within  DEL?  using  a  linear 
approxima  tion. 

2.  Adjusts  the  deposition  received  cn  the 
ground  at  the  PERSON'S  location  to  the 
dosage  received  on  the  outer  layer  of  the 
PERSON'S  clothinq  or  skin  based  on  the 
collective  protection  category,  and  the 
presence  of  overhead  cover. 


ARGUMENT  INTEGER 


AGENT 


ARGUMENTS  REAL 


DEP  ( 1 -D) 

T.  END 

I .  ST  A  R'T 


SETS 


CREW  ( 1-D) 


LABELS 


BUNKER 


TEMPORARY  ATTRIBUTES  INTEGER 


CP 


This  attribute  indicates  the  current  level  cf 
collective  protection  afforded  the  PERSON 
V  alu  es : 

1  -  A  vehicle  with  an  operating  overpressure 

syst  em 

2  -  A  vehicle  without  an  overpressure  system 

3  -  A  bunker  or  building 

4  -  A  foxhole,  with  or  without  temporary 

overhead  cover 

5  -  Nc  protection  (the  PERSON  is  in  the  open) 


OPEN.  CLOS  EE 


This  VEHICLE  attribute  tells  if  the  vehicle 
is  open  or  closed.  It  is  used  to  determine 
the  leakage  of  agent  into  the  vehicle,  by 
setting  an  index  in  SW  .NBC . FILTER 
Value : 

0  -  if  the  vehicle  is  open 


1 


if  the  vehicle  is  closed 


VEH.  NO 


This  attribute  consists  of  the  ir. d®x  number 
used  to  identify  the  VEHICLE  nhat  the  PERSON 
is  on. 

V  al  u  e : 

0  -  The  PERSON  is  not  on  a  vehicle. 

NOMBES. (VEHICLE)  that  the  PERSON  is  on,  other¬ 
wise  . 


VEH.  SYS.  TYPE 


This  attribute,  along  with  VEH.  WPN. TYPE,  is 
used  to  identify  a  particular  vehicle  type. 
Value:  As  given  above 


VEH.  WPN.  TYPE 


This  attribute,  along  with  VEH.  SYS. TYPE ,  is 
used  tc  identify  a  Particular  vehicle  type. 
Value:  As  giver,  above 


EMECRAP.Y  ATTRIBUTE  REAL 


T.CHC 


This  a^rribute  provides  the  tin®  at  which  th® 
PERSON  assumed  his  current  level  of  collec¬ 
tive  protection,  if  he  went  into  C?  1,  2,  or 
3  during  this  iteration;  otherwise,  it  is  the 
time  that  he  created  temporary  overhead  cover 
in  CP  4  or  5.  It  is  also  used  as  a  check  to 
see  if  temporary  overhead  cover  exists. 

Value : 

0  -  if  no  overhead  cover  exists  (or  the 
PERSON  is  in  CP  1,  2,  or  3,  where  it 

automatically  exists) 

The  time  as  given  above,  if  overhead  cover 
exists. 


LOEAL  VARIABLES  INTEGER 


CLDCP 


This  variable  gives  the  value  for  the  most 
recent  collective  projection  category  that 
the  PERSON  was  in,  if  he  changed  categories 
during  BELT.  It  is  set  equal  to  the  current 
CP  value  at  the  beginning  of  the  iteration  by 
the  routine  UPDATE;  if  the  C?  category 
changes  for  any  reason,  the  old  category  is 
stored  in  OLDCF  for  the  remainder  of  the 
iteration  and  the  new  CP  category  is  stored 
in  the  attribute  CP.  It  is  used  to  accuratelv 


concent 


deter  nine  the  reduction  in 
dsDosition  caused  by  the  CP , 
Value:  As  given  above 


aticn  o: 


SCLDI3R 


This  variable  is  used  to  convenient lv 
to  the  memory  location  of  the  PERSON  wh 
currently  being  checked  in  the  model. 
Value:  SOLDIER  =  PE3SPTR  (  SAKE  (PERSON) 


VEH.  PTR 


(1-D) 


This  array  is  used  to  store  the  poin 
the  memory  location  where  the  tem 
entity  VEHICLE  and  its  attributes  are  s 


GLOEAL  VARIAELES 


REAL 


DELT 


The  variable  DELT  is  a  us sr- supplied 
eter  that  gives  the  time  interval  b 
iterations  of  CHEM. CHECK. 


DEP.  A.  CURR 


(1-D) 


This  array  holds  the  current  values  £ 
concentration  cf  agent  (s)  in  the  air 
height  of  2  meters)  at  the  location 
PERSON. 

Units:  mg  /  cubic  meter 
Dimension:  N.  AGENT 

Values:  As  given  above  for  each  agent 


DEP.  A.  OLD 


(1-D) 


This  array  holds  the  most  recent  valu 
the  concentration  of  agent  (s)  in  the  a 
a  height  of  2  meters)  at  the  location 
P3R SO  $ • 

Units  :*mg  /  cubic  meter 
Dimension:  N.  AGENT 

Values:  As  given  above  for  each  agent 


DEP.  G.  CURR 


(1-D) 


This  array  holds  the  current  values  f 
deposition  on  the  ground  at  the  locat 
the  PERSON. 

Units:  mg/  sg.  cm 
Dimension:  N. AGENT 

Values:  As  given  above  for  each  agent 


DEP.  G.  OLD 


(1-D) 
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This  array  holds  the  most  recent  values  rc 
the  deposition  on  the  ground  at  the  locatic 
of  the  PERSON.  This  information  was  obtains: 
during  the  last  iteration  of  the  model. 
Units:  mg/  sg.  cm 
Dimension:  N.  AG  ENT 

Values:  As  given  above  for  each  agent 


DEE.  RED 


(3-D) 


This  array  provides  the  conversion  factor  to 
convert  the  deposition  of  liguid  agent  or  the 
concentration  of  airborne  agent  outside  of 
the  PERSON' s  collective  Droi ection  to  the 
effective  concentration  inside  the  protection 
or  on  the  PERSON.  It  is  multiDlied  bv 
DEP.A.CURR  (The  first  element  m  the  last 
dimension)  and  by  DEP.G.CURR  (The  second 
element)  to  yield  tae  effective  ccncntraticns 
and  depositions  inside  the  collective  nrot  ac¬ 
tion,  'respectively.  It  is  used  only  for  CP 
categories  3,4  and  5.  (CP  categories  I  and  2 
are  represented  by  sw.  BREATHING)  . 

Dimensions:  N. AGENT  by  3  by  2 
Values: 

1st  dimension:  The  indices  represent  the 

various  agents 

2nd  dimension:  Tne  i.ndicices  indicate  the 

three  ncn-vehicular  degrees  of  collec¬ 
tive  protection.  They  are: 

1  -  Bunker  or  building  (CP=3)  or  foxhcle 

(CP=4)  with  temporary  overhead 
cover  (T.OHC  not  equal  to  zero) 

2  -  Foxhole  with  no  overhead  cover 

3  -  In  the  open  (CP=5)  with  temporary 

overhead  cover 
3rd  dimension: 

1  -  The  fraction  used  to  convert  the  air 

concent  rat  ion 

2  -  The  fraction  used  to  cor.ver  the  ground 

deposit  ion 


SW. NBC  .FILTER 


(6-D) 


This  array  p 
agent  throu 
percentage  o 
is  used  to  c 
m  the  air 
exterior  of 
concentratio 
vehicle.  T 
to  store  whe 
passenger  on 
abl$  HATCH 
vehicle  with 
vehicle  with 
either  vehic 
Dimensions: 
by  2  by 
Values : 
1st  dimensio 
2nd  dimensio 
3rd  dimensio 
PAX  =  1 


rovides  the  amount  of  leakage  of 

?h  a  vahicle,  expressed  as  a 
the  outside  concentration.  It 
cnvert  the  concentration  cf  ament 
and  deposition  of  agent  on  'she 
the  vehicle  ‘o  an  equivalent 
n  and  deposition  inside  the 
he  temporary  variable  PAX  is  used 
ther  or  not  the  PERSON  is  crew  or 


sure. 


closed,  and 
. VEH. WPN. TYPE 


out  overpressure,  closed,  and 
le  open  (CP=2). 

N. VEH. SYS. TYPE  by  N. VEH . WPN .TYPE 
3  by  2  by  N. AGENT 

n:  The  VEH. SYS. TYPE  of  the  PERSON 
n:  The  VEH. WPN. TYPE  of  the  EERSON 
n *  PAX 

if  PERSON  belongs  to  a  set  CREW 


PAX  =  2  if  the  PERSON  does  not  belcr.a  to 
a  set  CREW 
4th  dimension:  HATCH 

HATCH  =  1  if  CP  =1  (vehicle  with  coer- 
ating  overpressure  system) 

HATCH  =  2  if  CP  2  and 

OPEN.  CLOSED  (VEHICLE)  =  1  (vehicle 

without  overpressure:  closed 
HATCH  =  3  if  OPE  N. CL OS  ED (VEHICLE)  =  0 
5th  dimension:  State  of  agent 
1  -  for  liquid  agent 
?  -  for  vapor  or  aerosol 
6th  dimension:  The  agent  type 


T.  CURRENT 


This  variable  gives  the  current  simulation 
time  within  the  main  combat  model  calling  the 
chemical  effects  routines. 

Value:  The  time  as  given  above 


This  variable  gives  the  simulation  ~ine 
within  the  main  combat  model  at  the  time  of 
the  last  iteration. 

Value:  The  time  as  given  above 


RECURSIVE  VARIABLES  INTEGER 


HATCH 


This  variable  is  used  to  determine  the  index 
on  the  array  SW. NBC. FILTER  4th  dimension.  It 
is  set  equal  to  one  if  the  CP  equals  1 
(vehicle  with  operating  overpressure  system) 
It  is  sat  squalto  two  if  the  CP  equals  2  ana 
OPEN.  CLOSED  (VEHICLE)  equals  1  (vehicle 
without  over cressure:  closed).  It  is  set 

equal  to  3  if  OPEN  .CLO  SED  (VEHICLE)  equals  0. 


PAX 


This  variable  is  used  to  determine  the  index 
on  the  array  SW. NBC. FILTER  3rd  dimension.  It 
is  set  equal  to  one  if  the  PERSON  belongs  to 
a  set  CREW.  It  is  set  equal  to  two  if  zhe 
PERSON  does  not  belona  to  a  set  CREW. 


RECURSIVE  VARIABLES  REAL 


DEF.CURR  (1-D) 


This  array  is  used  to  store  the  values  for 
the  ground  deoosition  and  air  concentration 
at  the  location  of  the  PERSON  measured  the 
time  I. END. 


Dimension:  2 
Values: 

1  -  The  ground  deposition  at  time  T . END . 

2  -  The  air  concentration  at  time  T . END. 


DEF.OLD  (1-D) 


This  array  is  used  to  store  the  values  for 
the  ground  deposition  and  air  concentration 
at  the  location  of  the  PERSON  measured  the 
time  I. START. 

Dimension:  2 
V  alues : 

1  -  The  ground  deposition  at  time  T.  START. 

2  -  The  air  concentration  at  time  T.  START. 


BRIEF  EXPLANATION  OF  CODE: 


LINES  7-9 


These  lines  compute  the  starting  deposition 
^.nd  ccnc  <9r  r  dor.  Wii3n  rh.®  c*^^**'.  dnor  ^  2,^11  ^ 
argument  (f.  START)  is  egua_  to  the  start  In  a 
time  of  the  iteration  (It). 


LINES  10  -  14 


These  lines  compute  the  starting  deposition 
and  concentration  when  the  starting  time 
araument  (T.  STAPT1  is  not  the  starting  *•  ime 
of'the  iteration  (TL)  . 


LINES  15  -  17 


These  lines  compute  the  final  deposition  and 
concentration  when  the  final  time  argument 
(T. END)  equals  the  ending  time  of  the  itera¬ 
tion  (T. CURRENT). 


LINES  18-21 


These  lines  compute  the  final  deposition  and 
concentration  when  the  final  time  argument 
(T.  END)  is  not  equal  to  the  ending  time  of 
the  iteration  (T. CURRENT). 


LINES  23  -  68 


The  routine  next  checks  the  collective 

?rotection  category  of  the  person  by  checkincr 
he  global  variable  OLDCP.  If  the  CP  category 
is  changed  at  any  time  during  DELT,  the  cl a 
C?  value  is  stored  in  this  variable,  and  it 
will  be  updated  to  the  new  CP  category  before 
it  is  called  a  second  time  by  DO  SE2  or  DOSE 
3.  1 


24  8 


LINES  23 


44 


If  the  OLDCP  value  is  one  or  two,  the  PERSON 
is  inside  a  vehicle.  The  adjustment  factors 
f?r  vehicles  are  contained  in  a  six- 
dimensional  array  SW.  NBC.  FILTER.  The  value 
contained  in  the  array  indicates  the 
percentage  of  the  outside  dosage  of  agent 
that  will  penetrate  into  the  vehicle.  This 
value  is  multiplied  by  the  average  deposition 
and  concentration  over  the  interval  of 
interest  to  yield  the  deposition  and  concen¬ 
tration  used  in  dosage  calculations.  The 
temporary  variables  HATCH  and  PAX  are  used  to 
set  the  3rd  and  4th  indices  of  SW.  NBC  .FILTER. 


LINES  45  -  50 


If  the  OLDCP  is  three,  the  person  is  in  a 
bunker.  The  arrav  DEP.RED  is  used  to  calcu¬ 
late  the  reduction  in  deoosition  afforded  by 
the  bunker.  The  value  in  DEP.RED  represents 
the  percent  of  the  unadjusted  ground  deposi- 
t  ■* on  1.x. to  ~n.tr  ^cl''  activ9 

protection. 


LINES  51  -  52 


If  the  OLDCP  is  four  (foxhole)  f  a  check  is 
made  tc  determine  if  the  foxhoxe  has  tempo¬ 
rary  overhead  cover  (T.OHC  not  equal  to  zero, 
indicating  the  overhead  cover  has  been 
assumed)  .  If  it  has,  it  is  assumed  tc  provide 
the  same  degree  of  chemical  protection  as  a 
bunker,  and  the  dose  is  computed  accordingly. 


LINES  53  -  58 


If  there  was  no  overhead  cover,  a  different 
value  from  DEP.RED  is  multiplied  by  the 
average  ground  deposition  to  give  the  deposi¬ 
tion  on  the  PERSON  in  the  foxnole. 


LINES  59  -  64 


If  the  OLDCP  is  not  one,  two,  three,  or  four, 
it  must  be  five  which  indicates  that  the 
PERSON  is  in  the  open.  A  check  is  made  to  see 
if  temporary  overhead  cover  has  been  assumed 
(T.OHC'not  equal  to  zero).  If  it  has,  the 
third  index  in  the  second  dimension  of 
DEP.RED  is  used  to  find  the  amount  of  agent 
that  has  penetrated  under  the  cover. 


sir 


HUES  65  -  68 


If  no  cover  has  been  assumed,  no  adjustment 
is  made  to  the  deposition  -  the  deposition  on 
the  ground  at  the  PERSON'S  location  is 
assumed  to  be  the  same  as  that  found  on 
PERSON.  and  the  average  of  the  old 
current  depositions  will  be  used  to  find 
dosage  received. 
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ROUTINE  DEPOSITION  GI7EN  T. START,  T . END.  AND  AGENT  YIELDING  CEP 
DEFINE  T  .  5 1 A  F  T  AND  T.EtiD  AS  5-DIMENSIONAL,  REAL  VARIABLES 
DEFINE  AGENT.  HATCH,  PAX  AS  0-D IMENS IONA L,  INTEGER  VARIABLES 
DEFINE  DEE,  CEE. OLD,  AND  CEP. CURS  AS  1-DIMENSIONAL,  REAL  VARIABLES 
PRINT  2  LINES  WITH  T. START,  T. END,  AND  AGENT  THUS 
ROUTINE  DEPOSITION  CALLED  GIVEN  T. START  =  **♦.***,  T. END  =  *«■*.*** 

AND  AGENT  ■  ** 

RESERVE  CEE (*) ,  CEP.CLD(*),  AND  DEP. CURR  (*)  AS  2 
IF  T. START  IS  EQUAL  TO  TL 

LET  DEF.OLC(I)  ■  DEP .  G  .01 D  (A  GENT) 

LET  DEE.  CLC  (2)  -  DEP .  A .OL  C  A  G 2N  T) 

ELSE  LET  CEP . OLD (1 )  -  (  (DEP. G.C URR  (AGENT) -DEP. G. OLD (AGENT) )  * 

(  (T.  STASI-TL)  /DELT)  )  ♦  DEP.  G  .OLDUGENT) 

LET  DEP. OLD  (21=  ((DEE. A. CUR R (AGENT) -DEP . A. OLD (AGENT) )  * 

< (T.STARI-IL) /BELT) )  ♦  DE P. A . OLD (AG ENT) 

REGARDLESS 

IF  T.SND  IS  EQUAL  TO  T. CURRENT 

LET  DEp.CUFH(I)  =  DEP. G. CURE  (AGENT) 

LET  DZE.CLPRj2)  =  D  EP  .  A.  CURB  ( AG  ENT 
ELSE  LET  CEP.CUER(I)  =  (  (CEP . G. CUR R (AGENT) -DEP .OLD ( 1 ) )  * 

((T.SND-T. START)  /  (T.  C  URRENT- T.  START)  )  )  DEP.OLD(I) 

LET  DEP.  CURR  (2)  =  (  {DEP. A. CURR  (AGENT) -DEP.  OLD  (  2)  1  * 

(  (T.SND-T.ST  ART) /(T.CORRENT-T.START))  )  ♦  DEP. OLD  (2) 

REGARDLESS 

IF  (OLDCE  ■  1)  CB  (OLDCP  »  2) 

LET  HATCH  ■  3 

IF  OPEN. CLCS ED(  VEH.PTR(  VEH . HO  (SOLDIER)  )  )  =  1 
IF  CLDCP  =1 

IET  HATCH  =  1 
ELSE  LET  HATCH  *  2 
REGARDLESS 

LIST  VEH.NO (SOLDIER) .HATCH, OLDCP -OPEN. CLOSED (  VEH.PTR(  VEH. NO  (SOLDIER)  )) 
REGARDLESS  IF  SOLDIER  IS  IN  A  CREW 
LET  PAX  =  1 
ELSE  LET  PAX  =  2 
REGARDLESS 
LIST  PAX 

LET  D EP  ( 1)  *  f(D EP. CURR  (1  )*D EP.  OLD  (1)  )  /2)  * 

SW . NEC. FILTER { VEH .SYS. TYP  E  (SOLDIER)  , VEH. WPN .TYPE (SOLDIER)  , 

P  AX,  HATCH,  1,  AG  ENT) 


inAfUAi  f  i  •  n  v]  i,  a  f 

LET  DEP  (2)  »  ((DEP.CURR(2)*DEP.OLD(2))/2)  * 

SW . NBC. FILTER ( VEH .SYS. TYP  E (SOLDIER)  , VEH. WPN .TYPE (SOLDIER)  , 


*  DEP.RED(AGENT,  1,  1) 
DEP.  RED (AGENT, 1,2) 


FAX, HATCH, 2, AGENT) 

LET  OLCCP  *  CP(SOLDIER) 

"LIST  C2P 

FETURN 

OTHERWISE  IF  (OLDCP  =  3) 

•BUNKER*  LET  CEP(1)  =  (( DEP  .  CURR  (1)  +DEP .OLD  ( 1 )  1/2) 

LET  DEP  (2)  =  ((DEP.CURR(2)  ♦DEP. OLD  (2)  )  /2)  * 

LET  CLCCE  ■  CP(SOLDIER) 

"LIST  CE? 

FETURN 

OTHERWISE  IF  (CLCCP  =  4) 

Ic  X. OHC  (SOLDIER)  IS  NOT  EQUAL  TO  0,  GO  TO  BUNKER 
CIHERWIsi 

LET  DEP  ( 1)  *  ((DEP.  CURR(1)+DEP.OLD(1)  )/2)  *  DEP.  RED  (AGENT,  2,  1) 
LET  DEP]2)  =  ( l DEP. CURR (2) ♦DEP.OLD (2)  ) /2)  *  DEP. BED (AGENT, 2,2) 
LET  OLDCP  *  CP(SOLDIER) 

"LIST  CEP 

FETURN 

OTHERWISE  IF  T. CHC (SOLDI  SB)  IS  NOT  EQUAL  TO  0 

LET  DEP  (1‘  . . . . . 

LET  DEP 
LET  OLC 
"LIST  CEP 

RETURN 

OTHERWISE  LET  DEP(I)  ■  (DEP.  CUB R ( 1 ) +DEP . OLD ( 1) ) /2 

LET  DEP  (2)  »  (DEP. CURB  (2)  ♦DEP. OLD - 

"LIST  CEP 

RETURN 

END  "OF  ROUTINE  DEPOSITION 


if  l.gn,  lb  MUX  fiUUAL  1U  U 

?(1)  =  ((DEP.CURR(I)  +DEP.OLD  (1)  )  /2)  *  DEP.  RED  (AGENT,  3,  1 ) 
?  (2)  »  j(DEP.CURR(2)  +DEP.OLD  (2)  )  /2)  *  DEP.  RED  (AGENT,  3,2) 
:CP  »  CP(SOLDIER) 


(2))/2 
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10.  The  Routing  DOSE1 


Purpose : 

1.  It  deter  lines  if  there  is  any  chemical 
agent  present  at  the  PERSON'S  location, 
either  on  the  ground  (and  thus,  on  the 
PERSON  if  exoosed)  or  in  the  air.  If  net, 
the  routine  exits  to  the  calling  program. 

2.  The  routine  computes  the  dose  received 
during  the  previous  DZLT  period  of  time, 
if  not  already  computed.  It  does  this  by 
either  computing  the  dose  in  the  routine, 

.or  by  calling  the  DOS22  routine. 


BOUTINES  CALLED  BY  DOSE1 


DCSE2 


TEMPORARY  ATTRIBUTES  REAL 


T.EECON 


This  attribute  gives  the  na=»  at  which  the 
process  of  d aconpaminaticn  was  completed,  to 
include  the  donning  of  full  chemical  protec¬ 
tion  after  decontamination. 

Value;  The  time  as  given  above 


T.MASK 


This  attribute  stores  the  time  at  which  the 
PERSON  finished  donning  his  protective  mask. 
Value;  The  time  as  given  above. 


GIOEAL  VARIABLES  INTEGER 


N.  AGENT 


This  variable  gives  the  maximum  number  of 
agents  that  will  be  used  in  a  given  scenario. 
Value;  As  given  above 


SOLDIER 


This  variable  is  used  to  conveniently  refer 
to  the  memory  location  of  the  PERSON  which  is 
currently  being  checked  in  the  model. 

Value;  SOLDIER  =  PERSPTR(  NAME  (PERSON)  ) 
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GLOBAL  VARIAELES 


REAL 


AGA.COMDOSE  (1-D) 


This  array  holds  the  accumulated  IV  dosage 
for  each  agent. 

Dimension : ' N . AGENT 

Value:  The  dosaas  in  tncr  accumulated  uc  tc  the 
current  time 


AGA.  DECON.  COSE  (1-D) 


This  array  holds  the  average  dosage  for  each 
agent,  in  mg,  that  the  PERSON  will  receive 
during  each  DELT  interval  while  he  is 
Derforming  decontamination.  It  is  used  to 
increment  the  accumulated  dosage  array 
AGA.CUMDOSE  for  every  DELT  interval  during 
which  the  PERSON  is  oerformir.g  decontamina¬ 
tion.  The  DECON 2  routine  will  compute  this 
value . 

Dimension:  N. AGENT 

Value:  A  dosaae  in  mg,  which  is  the  total 
dose  received  during  decontamination 
divided  by  the  number  of  DELI  intervals 
it  takes  to  perform  the  decontamination. 


DEP.  A.CURR  (1-D) 


This  array  holds  the  current  values  fcr  the 
concentration  of  agent (s)  in  the  air  (at  a 
heiaht  of  2  meters)  at  the  location  or  tne 
PERSON. 

Units:  mg  /  cubic  meter 
Dimension:  N.  AGENT 

Values:  As  given  above  for  each  agent 


DEP.G.CURR  (1-D) 


This  array  holds  the  current  values  for  the 
deposition  on  the  ground  at  the  location  cf 
the  PERSON. 

Units:  mg/  sq.  cm 
Dimension:  N. AGENT 

Values:  As  given  above  for  each  agent 


MIN.  A.CHEM  (1-D) 


This  array  provides  the  minimum  significant 
level  of  air  concentration  for  each  aaent. 
If  the  concentration  is  below  this  value;  it 
is  treated  as  if  there  were  no  agent  present. 
Dimension:  N. AGENT 

Values:  The  minimum  significant  concentration 
fcr  each  agent 


MIN.  G.  CHEM 


(1-D) 


This  array  provides  the  minimum  significant 
level  cf  ground  deposition  for  each  aaent. 
If  the  deposition  is  below  this  value,  it  is 
treated  as  if  there  were  no  agent  presen*. 
Dimension:  N. AGENT 

Values:  The  minimum  significant  deposition 
for  each  agent 


I. CURRENT 


This  variable  gives  the  current 
time  within  the  main  combat  model 
chemical  effects  routines. 

Value:  The  time  as  given  above 


TA.PF.CHEM  ( 1-  D) 


This  array  Drovides  the  time  that  the  current 
level  cf  individual  chemical  protection  was 
donned,  for  each  body  area. 


simulat ion 
calling  the 


TL 


This  variable  gives  the  simulation  time 
within  the  main  combat  model  at  the  time  of 
the  last  iteration. 

Value:  The  time  as  given  above 


RECURSIVE  VARIABLE  INTEGER 

CCNTAM 


This  variable  serves  as  a 
if  there  is  any  chemical 
the  ground  or  in  the  air) 
location. 


RECURSIVE  VARIABLES 


flag  to  determine 
agent  present  (on 
at  the  PERSON'S 


REAL 


T.INT 


This  variable 
intermediate 
T. CURRENT,  if 


serves  to  store  the  value  of  an 
time  between  T .  OLD  and 

any . 


I. OLD 


This  variable  is  used  to  store  the  value  of 
the  beginning  of  a  time  interval  for  dose 
computations.  It  is  equal  to  TL  is  decontami¬ 
nation  did  not  end  during  DELT;  equal  to 
T.DECCN  if  decontamination  did  finish  during 
DELT. 


253 


BRIEF  EXPLANATION  OF  CODE 


LINES 


LINES 


LINES 


LINE  1 


LINES 


5-9 


The  initial  check  provides  a  means  of 
bypassing  this  routine  in  cases  where  the 
individual  is  not  in  an  area  of  chemical 
hazard  or  contaminated  as  of  the  current 
time,  T.  CURRENT.  If  he  is  facing  either  a 
ground  or  airborne  hazard,  the  routine  must 
compute  the  dose  received  from  that  hazard. 


10  -  13 


Checks  to  see  if  decontamination  was  being 
performed  in  the  DELT  interval  of  interest, 
and  has  not  yet  been  completed.  If  it  was, 
the  dose  for  the  interval  has  been  computed 
by  the  DSCON  routine,  and  the  dose  tc  be 
accumulated  during  DELT  is  stored  in  the 
array  AGA .  DE  CON .  DOSE.  The  DOS  El  routine  will 
update  the  accumulated  dose  by  adding  the 
amount  in  AG  A.  DECON.  DOSE  to  the  value 
contained  in  the  array  AGA .CUKD033  for  each 
agent . 


14  -  IS 


Initializes  T.CLD,  I.  int 


6 


If  decontamination  had  been  completed  during 
the'  last  DELT  seconds,  the  routine  will 
adjust  the  dose  computation  for  the  period 
since  decontamination  was  completed  by 
setting  the  beginning  of  the  interval  over 
which  the  dose  is  tc  be  commuted,  T. OLD ,  to 
the  time  decontamination'  was  completed, 
T.DECCN. 


18  -  26 


Checks  to  see  if  masking  or  donning  of  any 
individual  items  occurred  during  the  DEL* 
period  of  interest.  If  masking  or  dcnnina  an 
item  had  been  completed  during  the  DELT 

?eriod.  dosage  calculations  are  performed  at 
he  cld  level  of  protection  until  the  new 
level  was  completely  assumed,  then  at  the  new 
level  cf  protection.  The  variable  T. INT  is 
used  to  split  up  the  interval  into  two;  each 
with  a  different  level  of  protection. 


LINES  22  -  24 


Checks  to  see  if  two  or  more  events  occurred 
during  DELT;  if  they  have,  the  ccsaqe  is 
first  computed  ever  the  interval  T.3LC  to 
T.INT.  then  T ,0£D  is  assigned  the  value  I.  IN? 
sc  the  remaining  lines  will  compute  the 
remaining  dosage  -  that  received  after  the 
original  time  t.INT. 


LINES  23;  28;  29;  30 


The  routine  calls  the  DOS E 2  routine,  which 
actually  computes  the  dosage  received  during 
appropriate  interval  and  assigns  the  cumula¬ 
tive  aose  to  the  array  AGA.CUMDOSS  for  each 
agent.  Both  inhalation  and  percutaneous 
dosages  are  considered,  and  converted  to  an 
equivalent  intravenous  (17)  dose  by  DOSE 2. 


CODE 


1  ROUTINE  COS  SI 

2  DEFINE  T.CLD  AND  T.INT  AS  0- DIH  ENS  ION  AL,  REAL  VARIABLES 

3  DEFINE  CC  NT  AH  AS  A  0 -DIN ENSIONA L,  INTEGER  VARIABLE 

3  PRINT  1  LIVE  THUS 

ROUTINE  DOSE1  CALLED 


u  =  1  TC  fl.  AGENT ,  uu 
IF  DEP.G.CURR  (J)  IS  GE  HI  N .  G  .CHEN  ( J),  L2T  CONTAH 
E2GAR  DLESS  IE  DSP . A.C UBS (J)  IS  GE  HIS. A. CHEH (J) , 


LET  CONTAH 


REGARDLESS  LCCP 
IP  CONTAH  *  0,  RETURN 

OTHERWISE  IF  T. CECON  (SOLDIER)  IS  GT  T. CURRENT, 

FOR  J  *  1  10  V.AGENT,  LET  AG  A. CUHDOSE ( J)  =  AGA.CUNDOSE  (J) 
AGA.IECCN.  DOSE  (J) 

RETURN 

OTHERWISE  LET  T.INT  *  0 
LET  I. OLD  =  TL 


16  IF  T.DECCN(SCLDIER)  IS  GT  TL,  LET  T.OLD  =  T. DECON  (SOLDIER) 

17  REGARDLESS 

18  IP  (T.HASK(SCLDIER)  IS  GT  T. OLD) AND (T. HAS K (SOLDIER)  IS  LT  T. CURRENT) 

19  LET  I. INI  =  T.HASR(SOLDIER) 

20  REGARDLESS  FCE  I  =  1  TO  7,  DO 

21  IF  (TA.PF.CHEN(I)  IS  GT  T.OL D) AND (TA. PF.CHEH  (I)  IS  LT  T. CURB ENT) 

22  IF  T.IKT  IS  NOT  SQ0AI  TO  0 

23  CALL  DCSE2  GIVEN  T.OLD  AND  T.INT 

24  LET  I. OLD  =  T.INT 

25  REGARDLESS  LET  T.INT  =  TA . PF .CHEB ( I) 

26  REGARDLESS  LOCP 

27  IF  T.INT  IS  NOT  EQUAL  TO  0 

28  CALL  DCSE2  GIVEN  T.OLD  AND  T.INT 

29  CALL  DCS  E2  GIVEN  T.INT  AND  T. CURRENT 

30  ELSE  CALL  D0SE2  GIVEN  T.CID  AND  T. CURRENT 

31  REGARDLESS 

32  RETURN 

33  END  "OF  ROUTINE  DOSE1 
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Ths  Routine  COS E2 


Purpose : 

The  DCSE2  routine  computes  the  dose  received 
during  the  interval  passed  to  it  free  the 
routine  DOS  El  under  each  of  the  following 
cir  cu  instances : 


1.  No  action  was  taken  during  the  given 
interval  that  would  have  affected  the 
PEESON's  chemical  protective  status,  or 

2.  The  PERSON  changed  his  collective  protec¬ 
tion  status  during  DELT. 


ARGUMENTS  REAL 


T.  END 
T.  START 


FCUTINES  CALLED  BY  DOS E2 


DEPOSITION 
DOSE. COMPUTE 


LABELS 


OUT 


TEMPORARY  ATTRIBUTES  REAL 


T.CP 


This  attribute  provides  the  time  at  which  the 
PERSON  assumed  his  current  level  of  collec¬ 
tive  protection. 


Value:  The  time  as  given  above 


T.OHC 


This  attribute  provides  the  time  at  which  the 
PERSON  assumed  his  current  ievel  of  collec¬ 
tive  protection,  if  he  went  into  CP  1,  2,  or 
3  during  this  iteration;  otherwise,  it  is  the 
time  that  he  created  temporary  overhead  cover 
in  CP  4  or  5.  It  is  also  used  as  a  check  to 
see  if  temporary  overhead  cover  exists. 


Value : 

0  -  if  no  overhead  cover  exists  (or  the 
PERSON  is  in  CP  1,  2,  or  3,  where  it 

automatically  exists) 
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The  time  as  giver,  above,  if  overhead  cover 
exists. 


GIOEAL  VARIAELES 


INTEGER 


N. AGENT 


This  variable  gives  the  maximum  number  of 
agents  that  will  be  used  in  a  given  scenario. 

Value:  As  given  above 

SCLDIER 


This  variable  is  used  to  conveniently  refer 
to  the  memory  location  of  the  PERSON  waich  is 
currently  being  checked  ir.  the  model. 


Value:  SOLDIER  =  PERSPTS(  NAME  (PERSON)  ) 


EEIEF  EXPLANATION  OF  THE  CODE: 


LINES  9-11 


to  see  ir 


tne 


The  routine  first  checks 
collective  protection  category  (CP)  changed 
durirc  the  interval  passed  to  it  (t.STA^t  to 
T .END  f  from  the  routine  DOSEl.  The 

DEPOSITION  routine  is  called  for  the  interval 
T. START  to  T.CP  (the  time  that  the  collective 
protection  category  was  changed)  . 


LINE  12 


The  dosage  is  computed  by  calling  the  routine 
DOSE.  COMPUTE ,  which  is  a  routine  that  was 
written  for  the  STAR  implementation  to 
oerform  the  actual  dosage  computations. 


LINES  13  -  15 


The  DEPOSITION  routine  is  called  again  and 
the  remaining  dosage  computed  by  calling  the 
routine  DOSE. COMPUTE  for  the  interval  T.CP  to 
T .END. 


LINES  17  -  25 


Changes  in  the  overhead  cover  category,  indi¬ 
cated  by  a  T.OHC  (the  time  overhead  cover  was 
assumed)  within  the  interval,  are  handled  in 
an  identical  manner  to  lines  10  -  16  above. 
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LINES  26 


28 


If  there  had  beer,  no  changes  in  protection 
status  during  the  interval,  the  DEPOSITION 
routine  is  called  for  the  entire  interval 
T.STABT  to  T. END  and  the  dosage  is  computed 
by  calling  the  routine  DOSE. COMPOTE  tor  the 
entire  interval. 


1  ROUTINE  DOS  E  2  GIVEN  T.  START  AND  T.END 

2  DEFINE  X. START  AND  T.END  AS  0-  DIMENSIONAL,  REAL  VARIABLES 

3  DEFINE  AG  AS  A  0-  DIMENSIONAL,  INTEGER  VARIABLE 

4  DEFINE  DEE  AS  A  1- D I  MENS  ICNA L,  REAL  ARRAY 

5  RESERVE  DE?  (*)  AS  2 

6  PRINT  1  LINE  WITH  T. START  AND  T.END  THUS 

ROUTINE  DOSE2  CALLED  GIVEN  T.  START  =  ***.***  ,  T.END  =  ***.*** 

7  FOR  J  *  1  TC  N.  AGENT,  DO 

3  LET  AG  *  J 

9  IF  (T.  CE  (SC1DIIP1  IS  GT  T.  START)  AND  (T . C P  (SOLD  LER)  IS  LI 

0  CALL  DEPOSITION  GIVEN  T. START,  T. CP  (SOLDIER) ,  AND  AG 


I  I. END) 


YIELDING  DEP (*) 

CALI  DOSE. COMPUTE  GIVEN  T. START,  T  .  CP  ( SOLDIFR)  ,  AG,  AND  DEP  (*) 
CALL  DEPOSITION  GIVZN  T. C P  (SOLDIER)  ,  T.END,  AND  AG 
YIELDING  DEE (*) 

CALL  DOSE. COMPUTE  GIVEN  T  .CP  (SOLDIER)  ,  T.END,  AG,  AND  DEP(*) 

GO  CUT 

REGARDLESS  IF  (T. OHC  (SOLDIER)  IS  GT  T. START)  AND  (T . OHC  (SOL DIER ) 

1$  LT  T.END)  ■ 

CALI  DEPOSITION  GIVEN  T. START,  T. OHC ( SOLDIER) ,  AND  AG 
YIELDING  D£P(*) 

CAtt  DCSE. COMPUTE  GIVEN  T. START,  T. OHC  (SOLDIER)  ,  AG,  AND  DEF(*) 
CALL  OEEGSITION  GIVEN  T.OHC  (SOLDIER)  ,  T.END,  AND  AG 
•  YIELDING  DEP{*) 

CALI  DOSE. COMPUTE  GIVEN  T . OHC (SOLDI ER) ,  T.END,  AG,  AND  DEP (*) 

GO  OUT 

BEGARDIESS  CALL  DEPOSITION  GIVEN  T. START,  T.END,  AND  AG 
YIELDING  DEP (*) 

CALL  DCSE. COMPUTE  GIVEN  T. START,  T.END,  AG,  AND  DEP(«) 

•  OUT* 


32  END 


LOOE 

RETURN 


"OF  aCUTISE  DOS  E2 
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2.  II 13.  Routine  CHBMCAS.  EFFECTS 


Furpose 

1.  Simulates  the  injection  of  the  nerve  aoent 
antidote  when  symptoms  of  chemical  agent 
ooisoning  appear,  when  presented  with  an 
actual  nerve  agent  hazard,  and  when  detec¬ 
tion  of  any  chemical  agent  hazard  occurs. 

2.  Determines  if  the  impairment  dess 

threshold  of  the  PERSON  has  been  passed 
for  each  of  the  chemical  agents,  and 

assigns  the  time  that  the  threshold  has 
been  reached  to  the  array  TA.INCAP,  whose 

?cinter  is  stored  in  the  attribute 
AG. INCA  P • 

3.  calls  the  routine  SYMPTOM. DETECT  the  first 
time  that  an  impairment  dose  threshold  is 
oassed. 

4.  Determines  if  the  incaDacitation  dose 
threshold  of  the  PERSON  has  been  oassed 
for  each  of  the  chemical  agents,'  and 

assigns  the  time  that  the  threshold  has 
beer,  reached  to  the  arrav  TA. INCAP. 

5.  Determines  if  the  lethal  dose  threshold 
has  been  passed  for  ar.y  agent.  If  it  has, 
assigns  a  time  of  learn  :hrc‘jah  the  attri¬ 
bute'  T. LSTH. 


ROUTINES  CALLED  3Y  CHEMCAS. EFFECTS 


SAA 

SYMPTOM.  DETECT 


LABELS 


OUT 


TEMPORARY  ATTRIBUTES  REAL 


T.LSTH 


This  attribute  gives  the  time  of  death 
occuring  as  a  result  of  an  overdose  of  chem¬ 
ical  agent.  It  is  assigned  the  first  time 
the  dosage  from  any  chemical  agent  Dasses  its 
respective  lethal  dose  threshold. 

Value:  The  time  as  given  above 


T.NAA 


This  attribute  stores  the  time  at  which  the 
PERSON  finished  injecting  himself  with  a 
nerve  agent  antidote. 

Value:  The  time  as  given  above 
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GIOEAL  V  ARIAELES 


INTEGER 


AGENT. TYPE  (1-D) 


This  array  is  used  to  store  an  integer  used 
tc  identify  the  type  of  agent.  All  nerve 
aaents  should  be  given  a  value  of  1;  ether 
positive  integers  can  be  used  to  denote  ether 
types  cf  agent.  It  is  used  to  check  the  type 
or“  agent  when  the  nerve  agent  antidote  is 
injected:  if  the  agent  type  is  nerve,  the 

dosage  will  be  reduced  by  NAA.  FACTOR;  if  the 
type  is  not  nerve,  then  no  dosage  reduction 
will  be  applied. 

Dimension:  N. AGENT 
Value : 

1  -  Fcr  nerve  agents 


N.  AGENT 


This  variable  gives  the  maximum  number  of 
aaents  that  will  be  used  in  a  aiven  scenario. 
Value:  As  given  above 


SIDE 


This  variable  is  used  tc  store  the  value  of 
the  side  the  PERSON  is  on.  If  the  attribute 
COLOR  is  used,  SIDE  =  COLOR  (PERSON)  +  1 
Value:  COLOR  (PERSON)  +  1 


SOLDIER 


This  variable  is  used  to  conveniently  refer 
tc  the  memory  location  of  the  PERSON  which  is 
currently  being  checked  in  the  model, 
value:  SOLDIER  =  ?ERSPTR(  NAME  (PERSON)  ) 


GIOEAL  VARIAELES  REAL 


AGA.CUMDOSE  (1-D) 


This  array  holds  the  accumulated  IV  desage 
fcr  each  aqent. 

Dimension  : '  N  .  AGENT 

Value:  The  dosage  in  mg  accumulated  up  tc  the 
current  time 


AGA.  IMPAIR  (1-D) 


This  array  holds  the  impairment 
threshold  values  for  each  agent. 
Dimension:  N. AGENT 

Value:  As  given  above,  for  each  agent 


dcse 


AGA.  INCAP 


(1-D) 


This  array  holds  the  incapacitation  dose 
threshold  values  for  each  agent. 

Dimension:  N. AGENT 

Value:  As  given  above,  for  each  agent 


AGA.  LETH  (1-D) 


This  array  holds  the  lethal  dose  threshold 
values  for  each  agent. 

Dimension:  N. AGENT 

Value:  As  given  above,  for  each  agent 


DELT 


The  variable  DELT  is  a  user-supplied  param¬ 
eter  that  gives  the  time  interval  between 
iterations  of  CHEM. CHECK. 


CLD.  DOSE  (1-D) 


This  array  is  used  to  store  the  values  for 
the  accumulated  dosage  as  of  end  of  the 
Dtevicus  iteration.  It  is  used  to  determine 
times  at  which  impairment,  incapacitation,  or 
death  occurred. 

Dimension:  N. AGENT 
Value:  As  given  above 


PC.NAA  (1-D) 


This  array  contains  the  probability  that  the 
PERSON,  as  a  result  cf  poc?  training  or 
Dame,  will  inject  himself  with  the  nerve 
agent  antidote  under  circumstances  other  than 
the  appearence  of  nerve  agent  symptoms,  such 
as  detection  of  the  agent  or  the  apcearence 
of  symptoms  caused  by  a  chemical  agent  ether 
than  trie  nerve  agent. 

Dimension:  N.SID2 

Values;  The  probability  as  given  above 


T.CHEMCORR 


This  variable  serves  as  a  counter  that  keeps 
track  cf  the  time  at  which  the  last  action 

§erformed  or  scheduled  to  be  performed  by  the 
ERSON  was  completed. 


TA. IMPAIR  (1-D) 


This  array  provides  the  time  at  which  the 
impairment  dose  threshold  was  reached  for 
each  agent. 

Dimension:  N. AGENT 


Values: 

0  -  if  the  impairment  dose  threshold  has  net 

The  time  as  given  above  if  the  impairment 
dose  threshold  has  been  reached 


TA. INCAP  (1-D) 


This  array  provides  the  time  at  which  the 
incapacitation  dose  threshold  was  reached  for 
each  agent. 

Dimension:  N. AGENT 
Values: 

0  -  if  the  incapacitation  dose  threshold  has 
net  been  met 

The  time  as  given  above  if  the  incapacitation 
dose  threshold  has  been  reached 


This  variable  gives  the  simulation  time 
within  the  main  combat  model  at  the  tine  of 
the  last  iteration. 

Value:  The  time  as  given  above 


UPTR  (1-D) 


This  array  is  used  as  a  convenience  to  call 
fer  a  uniform  (0,1)  random  number. 

Dimension:  3 
V  al s • 

1  -  2^  (the  uniform  distribution) 

2- 0  (the  first  parameter) 

3- 1  (the  second  parameter) 


RECURSIVE  VARIABLES  INTEGER 


AGENT 


This  variable  is  used  to  store  to  value  of 
the  current  agent  type  of  interest. 

Value:  The  iteration  index  j  (the  agent 

concern  ed)  . 


FLAG  1 


This  variable  serves  as  a  flag  to  determine 
if  any  impairment  dgse  thresholds  had  been 
reached  during  previous  iterations.  If  the 
value  equals  n. AGENT,  then  no  impairment  has 
occurred  previous  to  this  iteration. 

Values : 

N. AGENT  -  If  no  impairment  had  occurred  as  of 
the  last  iteration. 

Any  other  value  if  1  or  more  impairment 
dose  thresholds  had  previously  been 
reached . 


FLAG  2 


any  impairment  dose  threshold  had  been  met  or 
exceeded  durir.a  this  iteration.  If  one  (or 
mors)  had  beer.,  this  variable  also  carries 
the  agent  type  number  of  that  aaent  (or  the 
highest  number  if  two  or  more  agents  pass  the 
threshold  during  the  saae  iteration  of 
CHEM.  CHECK)  . 

Values: 

0  -  If  no  impairment  dose  threshold  had  been 
reached  during  this  iteration. 

The  agent  t yoe  number  -  if  an  aaent  had 
caused  impairment  during  this  iteration. 


RECURSIVE  VARIABLES  REAL 


0 


This  variable  is  used  to  store  a  uniform 
(0,1)  random  number. 


E  FIFE  EXPLANATION  OF  CODE: 


LINE  9 


The  routine  begins  by  checking  to  see  if  the 
impairment  dose  threshold,  found  in  the  array 
AGa. IMPAIR,  has  been  reached  for  any  chemical 
a  gen  t . 


LINES  10  -  14 


When  an  impairment  dose  threshold  is  reached, 
a  time  of  impairment  is  assigned  to  the  array 
TA.  IMPAIR. 


LINES  15  -  17 


If  the  agent  causing  the  impairment  is  a 
nerve  agent,  then  injection  of  an  antidote 
will  be  performed.  This  is  accomplished  by 
calling  the  routine  NAA. 


LINES  18  -  22 


If  the  nerve  agent  antidote  has  net  previ¬ 
ously  been  administered,  then,  when  symptoms 
of  a  chemical  agent  appear,  it  is  possible 
that  the  soldier,  as  a  result  cf  poor 
training  or  panic,  may  inject  himself  with 
the  nerve  agent  antidote.  Tnis  probability  of 
this  is  contained  in  PC. NAA.  If  injection 
will  occur,  based  on  the  comparison  cf  a 
uniform  (0,1)  random  number  with  PC. NAA,  the 
routine  NAA  will  be  called. 
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LINES  25  -  26 


If  FLAG1  is  sgu&l  to  N.  AGENT,  and  FLAG2  is 
equal  to  0,  than  an  impairment  dose  had  been 
reached  fcr  the  first  time  on  this  iteration. 
The  routine  SYMPTOM.  DETECT  is  called  to 
determine  if  the  onset  of  impairment  (causing 
the  appearance  of  symptoms)  will  result  in 
the  scheduling  of  a  detection  (if  a  chemical 
hazard  has  not  already  been  detected)  .  If  two 
or  mors  agents  cause  impairment  during  the 
same  DELT  interval,  the  one  with  the  highest 
number  is  arbitrarily  used  tc  call 
SYMPTOM. DETECT. 


LINES  30  -  35 


The  routine  next  checks 
has  reached  the  level  of 
any  aoent.  If  it  has,  a 
tion  from  that  agent  is 
array  TA.INCAP(i)  for  eac 


to  see  if  the 
incaoacitaticn 
time  of  incapac 
assigned  through 
h  agent  i. 


dose 

for 

ita- 

tha 


LINES  37  -  47 


If  the  incapacitation  dose  has  been  passed 
for  one  or  more  agents,  the  routine  checks  tc 
see  if  the  lethal  threshold  has  been 
reached.  If  it  has,  a  time  of  death.  T.LETH, 
is  assigned  as  an  attribute  of  the  PE3S0N. 


CODE 


1  ROUTINE  CHESCAS. EFFECTS 

2  '  ‘ 

3 
4. 

ROUTINE  CHESCAS. EFFECTS  CALLED 


DEFINE  FLAG1,  F  L  A  S  2  ,  AGENT  AS  0 -DI 3FNSIOS AL,  INTEG 
DEFINE  T.NAA.C,  U  AS  0 -DIHEN SIO HAL ,  REAL  VARIABLES 
PRINT  1  LINE  THUS 


EGER  VARIABLES 


5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 


LET  FLAG  1  =  C 
LET  FLAG2  =  0 
FOR  J  »  1  TO  N. AGENT,  DO 
LET  AGENT  *  J 

IF  TA. IMPAIR  (J)  IS  EQUAL  TO  0,  LET  FLAG1  ■  PLAG1 
THEN  IF  AGA.  CUMDOSE(J)  IS  GE  AGA.  IHPAIR  ( J) 

LET  FLAG2  *  J 


LEI  TA.  IMPAIR  (J) 


VGA . IMFAIR (J) -OLD. DOSE (J))/ 


I  / 

]AG A. C a HDdS 6  (J^-OLD .  DOS E  ( J)- j  *DfeLT  )  ♦  TL 


LET  T.CHEHCURR  *  TA. IMPAIR  (J) 
IF  AGENT.TYPE  ( J)  EQUALS  1 
CALL  NAA 
GC  CUT 


• 'TYPE  1  IS  NEEVE  AGENT 


"HO  NAA  INJECTION 
• • PREVIOUSLY 

I 

_  __  __  _ _  CALL  NAA 

REGARDLESS 
•OUT'  REGARDLESS  LOCE 
LIST  FLAG1.  FLAG2 

IF  FLAG  1  =  N. AGENT  "NO  IHPAIR  DOSE  REACHED  PREVIOUSLY 

IF  FLAG2  =  0.  RETURN  "NO  IHPAIRBENT  THIS  ITERATION 

OTHERWISE  CALL  S Y HPTO H.DE TEC T  GIVEN  FLAG 2  "IHPAIRHSNT  REACHED 
REGARDLESS 
LET  FLAG  2  =  0 
FOR  J  =  1  TC  S. AGENT,  DO 

IF  AGA.CUHDOSEJJ)  IS  GT  AGA.INCAP(J) 

THEN  IF  T A. INCAP  f  ~  -  “  ‘ 


' ’FOR  FIRST  TIKE 


LET  FLAG2  *  1 


:ap(j>  is  lqual  to  o 

LF(J)  *  (  /AGA. INCAP (J) -OLD. DOSE (J) )  / 
IHDOSE  (J)  -OLD.  DOSE  (J)  )  »DELT  )  ♦  TL 


LET  TA.INCAFj 
(AGA.  CU! 

REGARDLESS  LOOP 
IF  FIAG2  *  0,  RETURN 
OTHERWISE  FOB  J  *  1  TO  N. AGENT,  DO 

IF  AGA.CUMDOSE(J)  IS  GE  AGA. LETH(J) 

IF  T.LETH  (SOLDIER)  IS  NOT  EQUAL  TO  0 

T  «=■"  -  *  T.  LETH  (SOLDIER)  , 


LET 


END 


T.LETH  (SOLDIER)  *  HIN.?(  T.  L 
(  ( AG  A  .  INC  A  r  (J)  -OLD.  DOS  2  (J)  ] 
(AGA.CUKDOSE  -OL  D.  DOSE  (J)  ) 
ELSE  LET  T.LETH  (SO  ICIER)  * 

(  (AGA.  INCAF(J) -OLD.  DOSE  (J 
?AGA.  CUHDOSE  (J)  -OLD. DOSE  ‘ 
REGARDLESS 
REGARDLESS  LOCP 
RETURN 

"OF  ROUTINE  CHEHCAS.  EFFECTS 


♦  DELT  )  ♦  TL  ) 
$1 j  ^DELT  )  ♦  TL 
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13.  The  Routine  SYMPTOM.  DETECT 


FurFcse: 

1.  If  the  PERSON  has  nor  yet  detected  the 
presence  of  a  chemical  hazard,  the  routine 
schedules  a  detection  at  the  impai rms*": 
time  of  the  first  agent  to  cause  impair¬ 
ment.  The  onset  cf  impairment  is  assumed 
to  he  the  time  of  the  first  appearance  of 
noticeable  symptoms. 

2.  Regardless  of  when  detection  occurred,  the 
routine  will  call  the  routines  MASK,  OHC, 
DECCN,  and  MOPP. 


ARGUMENT  INTEGER 


AGENT 


ROUTINES 


DECON 

MASKING 

MCP? 

CKC 


TEMPORARY  ATTRIBUTE  INTEGER 


MASK 

nr 

This  attribute  indicates  if  the  PERSON  is 
wearing  the  chemical  protective  mask. 

V 3.1  U6  S 

0  -  if  the  mask  is  not  being  worn  (off) 

1  -  if  the  mask  is  being  worn  (on) 


TEMPORARY  ATTRIBUTES  REAL 


T.CHEMDET 


This  attribute  stores  the  time  at  which  the 
FERSON  detected  the  presence  of  a  persistent 
chemical  agent  hazard.  This  detection  may 
have  occurred  due  to  any  of  the  four  possible 
means  cf  detection  (see  the  DETECTION  routine 
discussion  in  Chapter  3  for  more  detail) . 


T.  MASK 


This  attribute  stores  the  time  at  which  the 
PERSON  finished  donning  his  protective  mask. 
Yalue:  The  time  as  given  above 
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GLOBAL  VARIABLES 


INTEGER 


SIDE 


This  variable  is  used  to  store  the  value  of 
the  side  the  PERSON  is  on.  If  the  attribute 
COLOR  is  used,  SIDE  =  COLOR  (PERSON)  +  1 
Value:  COLOR  (PERSON)  +  1 


SCLDIER 


This  variable  is  used  to  conveniently  refer 
to  the  memory  location  of  the  PERSON  wnich  is 
currently  bema  checked  in  the  model. 

Value:  S0LDIER'=  PERSPTR  (  NAME  (PERSON)  ) 


GLOBAL  VARIABLES  REAL 


PC.OHC  ( 1- D) 


This  array  contains  the  probability  that  a 
soldier  tnat  has  detected  the  oresence  of  a 
persistent  aoent  hazard  by  ahv  means  will 
assume  that  the  agent  is  still  falling  toward 
the  ground,  and  as  a  result  will  seek  over¬ 
head  cover. 

Dimension:  N.SIDE 

Values:  The  probability  as  given  above 


I.CHEMCURR 


This  variable  serves  as  a  counter  that  keeps 
track  of  the  time  at  which  the  last  action 
performed  or  scheduled  to  be  performed  bv  the 
PERSON  was  completed. 


EEIEF  EXPLANATION  OF  CODE: 


LINES  4-6 


The  routine  MASKING  is  called,  forcing  the 
PERSON  to  mask,  if  he  has  not  already  done 
so. 


LINE  7 


The  time  of  detection  of  the  presence  of  a 
persistent  chemical  agent,  T. CHEMDET ,  is  set 
equa}  to  the  latest  value  of  the  time  of 
impairment  (the  value  of  T.CHEMCDRR  if  net 
changed)  or  the  time  the  mask  was  denned. 
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LINE  8 


The  individual  may  assume  overhead  cover, if 
necessary,  so  tha*  he  may  decontaminate  any 
exposed  areas  of  "he  body.  This  is  tone  by 
calling  the  routine  OHC. 


me  overhead  cover, if 
may  decontaminate  any 


LINE  9 


The  DECON  routine  will  be  called,  and  the 
probability  of  delayed  decontamination, 
contained  in  the  global  variable 

PC. DEL. DECON ,  will  be  used  in  the  DECON 
routine. 


LINE  10 


irr 


The  MCPP  routine  is  called,  causing  thQ  indi¬ 
vidual  to  don  all  items  of  chemical 
protective  gear  If  decontamination  had  not 
Deen  performed  (which  would  have  caused  an 
increase  in  individual  protection  to  full 
protection)  . 


1  ROUTINE  SYHPTCB.  DETECT  GIVEN  AGENT 

2  DEFINE  AGENT  AS  A  0 - 01  BE NSIO NAL ,  INTEGER  VARIABLE 

3  PRIST  1  LINE  WITH  AGENT  THUS 
ROUTINE  STKPTOB. DETECT  CALLED  GIVEN  ** 

4  IF  MASK  (SCLDIER)  IS  NOT  EQUAL  TO  1 

5  PERPORI  N ASKING 

6  IET  I. CHEHCURR  =  T. H A SK (SOLD IER) 

7  REGARDLESS  LEI  I.CH EBDET  (SOLDIER)  *  T. CHEHCURR 

8  CALI  OHC  GIVEN  EC.OHC(SIDc) 

9  CALI  DECON 

10  CALI  HOPP 

11  RETURN 

12  END  ‘*0?  ROUTINE  ST HPTOH . DETECT 


iu.  The  Routine  NAA 


Purpose: 


Determine s  the  “in?  cf  the  injection  of 
the  nerve  agent  antidote,  and  assigns  that 
time  to  the  attribute  T.NAA. 

Updates  the  array  A.  ANTIDOTS,  assigning 
the  value  contained  in  the  global  variable 
NAA. FACTOR  to  tne  array  elements  corre¬ 
sponding  to  nerve  aaents. 


TEMPORARY  ATTRIBUTE 


REAL 


T.  NAA 


This  attribute  stores  the  time  at  which  the 
PERSON  finished  injecting  himself  with  a 
nerve  aqent  antidote. 

Value:  The  time  as  given  abcve 


GLOBAL  VARIABLES 


INTEGER 


AGENT. TYPE  (  1- D) 


This  array  is  used  to  store  an  integer  used 
to  identify  the  type  of  agent.  Ala  nerve 
agents  should  be  given  a  value  of  1;  ether 
oositive  inteaers  can  be  used  to  denote  c*her 
tvpes  cf  agent.  It  is  used  tc  check  the  type 
or  a  cant  when  the  nsrva  agent  antidote  is 
injected;  if  the  agent  type  is  nerve,  the 
dosage  will  be  reduced  by  naA. FACTOR.;  if  the 
type  is  not  nerve,  then  no  dosage  reduction 
will  te  applied. 

Dimension:  N. AGENT 
Value : 

1  -  Per  nerve  agents 


N.  AGENT 


This  variable  gives  the  maximum  number  of 
agents  that  will  be  used  in  a  given  scenario. 
Value:  As  given  above 


SIDE 


This  variable  is  used  to  store  the  value  of 
the  side  the  PERSON  is  on.  If  the  attribute 
COLOR  is  used,  SIDE  =  COLOR  (PERSON)  ♦  1 
Value:  COLOR  (PERSON)  ♦  1 


SCLDIER 


This  variable  is  used  to  conveniently  refer 
to  the  memory  location  of  the  PERSON  which  is 
currently  being  checked  in  the  model. 


Value:  SOLDIER  =  PERSPTR  (  NAME  (PEP  SOU)  ) 


GLOBAL  VARIABLES  REAL 


A. ANTIDOTE  (1-D) 


This  variable  is  used  to  reduce  the  dcsage 
for  each  aoent  by  mult iolying  the  accumulated 
dosage  bv  the  appropriate  arrav  element.  It 
is  initialized  at  1  m  the  main  (driver) 
program  when  the  array  is  created.  The 

Eointer  to  the  array  is  stored  in  the  attri- 
ute  ANTIDOTE.  Currently,  only  the  array 
elements  corresponding  to  the  nerve  agents 
are  modified  -  they  are  set  equal  to  the 
value  found  in  NAA. FACTOR  bv  the  routine  NAA 
Dimension:  N.  AGENT 

Value:  NAA.  FACTOR  for  nerve  agents;  a  suit¬ 
able  reduction  factor  for  other  agents. 


DI.NAA 


(2-D) 


This  array  holds  the  probability  distribution 
used  to  determine  the  time  required  tc  inject 
the  nerve  agent  antidote.  The  temporary 
variable  T.NAA.D  is  drawn  from  the  distribu¬ 
tion  and,  when  added  to  T.CHEMCURR,  sets  the 
time  at  which  the  injection  was  ccmDlete, 
T.NAA. 

Dimensions:  N.SIDE  by  3 
Values: 

1st  dimension:  The  side  of  the  PERSON 
2nd  dimension: 

1  -  The  distribution  type 

2  -  The  first  parameter  of  the  distribu¬ 

tion 

3  -  The  second  parameter  of  the  distri¬ 

bution 


NAA.  FACTOR 


(1-D) 


This 
tc  re 
accou 
dote. 
A.  ANT 
injec 
the 
AGA.  C 
r  educ 
Dime  n 
Value 


array 
duca  t 
nt  for 
Th 

I  BOTE 
ted. 

cur  re 
DMDOSE 
ed  by 
si  on : 

:  The 


Drovides  th 
he  effectiv 
the  effect 
e  value  is 
when  a  ne 
When  A. ANT 
nt  IV 
,  the  nerv 
*■  he  NAA. FAC 


e  reduction  factor  used 
e  intravenous  dosage  to 
of  a  nerve  agent  anti- 
olaced  in  the  array 
rve  agent  antidote  is 
IDOTE  is  multiplied  by 
dosage  contained  in 
e  agent  dosage  will  be 
TOR . 


N.SIDE 

reduction  factor  as  given  above 


T.CHEMCURR 


This  variable  serves  as  a  counter  that  keeps 
track  of  the  time  at  which  the  last  action 

§erformed  or  scheduled  to  be  performed  by  the 
ERSON  was  completed. 
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RECURSIVE  VARIABLE 


REAL 


T.NAA.  C 


This  variable  is  used  to  store  the  time  that 
it  takes  to  inject  a  nerve  agent  antidote. 

ESIEF  EXPLANATION  OF  CODE: 

LINE  4 


The  time  it  takes  to  administer  the  nerve 
agent  antidote,  T.NAA. D,  is  drawn  from  the 
array  DT.  NAA. 


LINES  5-6 


The  result  is  added  to  the 
time  for  the  individual, 
completion  tine  is  also 
attribute  T.NAA. 


LINES  7-10 


The  antidote  is  assumed  to  cause  a  reduction 
in  the  effective  nerve  agent  dosage  received 
by  the  PERSON,  which  can  be  expressed  as  a 
percentage  of  the  actual  dose  absorbed.  This 
percentage  is  contained  ir.  the  variable 
IJAA.  FACTOR.  Incorporation  of  this  change  ir. 
the  dosage  calculations  is  accomplished  by 
changing  the  value  in  the  arrav  A. ANTIDOTE 
from  its  initial  value  of  1  to  the  value 
NAA.  FACTOR  for  every  agent  whose  tvos  is 
nerve. 


current  simulation 
T.CHEMCUHB.  This 
to  the 


CODE 

1  ROUTINE  NAA 

2  DEFINE  T.NAA.D  AS  A  0- 0 IR ENS ION AL,  REAL  VARIABLE 

3  PRINT  1  II NE  THUS 
ROUTINE  NAA  CALLEC 

4  LET  T.NAA.D  *  DISTRISf  D 1 .NA A (S IDE  .*)  ) 

5  LET  T.CHEHCU8S  =  T.CHESCURR  ♦  T.NAA.D 

6  LET  T.NAA  (SOLDIER)  «=  T.  CHEMCURR 

7  FOR  J  =  1  TC  N. AGENT,  DO 

8  IF  AGENT. TYPE  (J)  ■  1 

9  LET  A.  ANTIDOTE  (J)  *  NAA.  F  ACTOR  (SIDE) 

10  REGARDLESS  LOCP 

11  LIST  T.NAA.D,  T . CBEHCUR R ,  T. NAA (SOL DIE8)  , A. ANTIDOTE 

12  RETURN 

13  END  ' 'OF  ROUTINE  NAA 
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15.  The  Routine  CROSSING 


Purpose 

1.  Simulates  the  protective  measures  chat 
would  be  taken  by  qround  troops  that 
encounter  a  chemical  aqer.t  contamination 
hazard  while  moving. 

2.  Computes  the  dosace  that  would  be  received 
by  troops  crossing  an  area  of  orior  depo¬ 
sition. 

3.  Handles  all  calculations  in  lieu  of  the 
routine  CHEM. CHECK.  once  CHEM. CHECK  has 
updated  the  situation  ana  found  that  it 
involves  crossing  a  previously  contami¬ 
nated  area  (any  area  with  ground 
deposition  but  no  aqent  in  the  air  from 
primary  deposition) . 


ROUTINES  CALLED  3Y  CROSSING 


CHEMCAS.  EFEECT 

DETECTION 

0CSE3 


LABELS 


DETECT 

NEXT 


TEMPORARY  ATTRIBUTES  INTEGER 


CHEMD2? 


This  attribute  shows  if  the  PERSON  has 
detected  the  presence  of  a  persistent  chem¬ 
ical  agent  nazard  as  of  the  previous 
iteration  of  CHEM. CHECK. 

V  alues : 

0  -  indicates  no  detection 
1  -  indicates-  detection 


CONTAMINATED 


This  attribute  indicates  if  there  is  contami¬ 
nation  over  the  entire  surface  of  the  PERSON 
or  his  collective  protection 
V  ell  U  6  S  « 

0  -  Nc'contamination  over  all  surfaces 
1  -  Contamination  present  on  all  surfaces 


CF 


This  attribute  indicates  the  current  level  of 
collective  Drotection  afforded  the  PERSON 
Values: 
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1  -  A  vehicle  with  an  operating  ov  sr pressure 

syst  am 

2  -  A  vehicle  without  an  overpressure  system 

3  -  A  hunker  or  building 

4  -  A  foxhole,  with  or  without  t  sneer  ary 

overhead  cover 

5  -  He  orotection  (the  PERSON  is  in  the  open) 


DEFN'UM 


This  attribute  gives  the  relative  defilade  of 

the  PERSON  at  any  given  tine 

Values: 

1  -  in  a  foxhole 

2  -  prone 

3  -  crawling 

4  -  kneeling  or  sitting 

5  -  standing 


TEMPORARY  ATTRIBUTE  REAL 


T.  CO  NT  AN 


This  attribute  gives  the  tins  at  which 
cont aminatio n  occurred  over  *he  entire 
surface  of  the  PERSON  or  his  collective 
protection. 

Value:  The  tine  at  which  contamination 

occurred 


GLOBAL  VARIABLES  INTEGER 


N,  AGENT 


This  variable  gives  the  maximum  number  of 
agents  that  will  be  used  in  a  aiven  scenario. 
Value:  As  given  above 


SOLDIER 


This  variable  is  used  to  conveniently  refer 
to  the  memory  location  of  the  PERSON  wnich  is 
currently  be  mo  checked  in  the  model, 
value:  SOLDI  ER'=  PERSPTR  (  NAME  (PERSON)  ) 


GLOEAI  VARIABLES  REAL 


DELT 


The  variable  DELT  is  a  user-supplied  param¬ 
eter  that  gives  the  time  interval  between 
iterations  of  CHEM. CHECK. 


DEP.  G.  CURR  (1-D) 
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This  array  holds  the  currant  values  for  the 
deposition  on  the  ground  at  the  location  of 
tha  PEHSOH. 

U  ni  t  s :  mg  /  s  g .  cm 
Dimension:  N. AGENT 

Values:  As  given  above  for  each  agent 


DEP.  G.  OLD  (1-D) 


This  array  holds  the  most  recent  values  for 
the  deposition  on  the  ground  at  -he  location 
of  the  PERSON.  This  information  was  obtained 
during  the  last  iteration  of  the  model. 

Units:  mg/  sg.  cm 
Dimension:  N. AGENT 

Values:  As  given  above  for  each  agent 


MIN.  G.CHEM  {1-D) 

This  array  provides  the  minimum  significant 
level  cf  ground  deposition  for  eacn  agent. 
Dimension:  N.  AGENT 


T.CHEMCURP 


This  variable  serves  as  a  counter  that  keeps 
track  cf  the  time  at  which  the  last  action 
performed  or  scheduled  no  be  performed  by  r.he 
PESSON  was  completed. 


This  variable  gives  the  simulation  time 
within  the  main  combat  model  at  the  time  of 
the  last  iteration. 

Value:  The  time  as  given  above 


EBIZF  EXPLANATION  OF  CODE: 


LINE  3 


The  first  check  the  routine  makes  is  tc  see 
if  CHEMDET  is  equal  to  1,  indicating  that  the 
PERSON  has  detected  the  oresence  of  a  chem¬ 
ical  agent  hazard.  If  he  has,  then  all 
reactive  measures  will  have  beer,  scheduled 
through  attribute  assignments  and  the  routine 
can  go  to  the  dosage  computation  section  NEXT 
directly. 
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LINES  4 


6 


If  the  PERSON  has  not  previously  detected  the 
presence  of  a  chemical  aaent  hazard,  then  the 
routine  checks  to  see  if  tha  PERSON  was  in 
contamination  previously  (DEP.G.OLD  net  eaual 
to  zero  for  any  agent)  .  If  h c  had  net  keen, 
then  he  must  have  just  entered  an  area  of 
contamination  and  the  beginning  point  for  any 
chemical  effects  or  actions.  T.CHEMCfJRR,  must 
be  set  at  the  time  at  which  he  first  entered 
the  contamination. 


LINES  8-9 


The  time  that  the  contaminated  area  was  first 
entered,  as  given  in  equation  3.11  in  chapter 
3,  Section  5,  is  usea  to  set  T.CHSMCURk  to 
indicate  the  beginning  of  the  chemical 
crossing  situation. 


LINES  10  -  15 


A  check  is  made  to  see  if  the  soldier  should 
be  taeged  as  contaminated.  H a  will  be  sc 
tagged  if  he  is  in  a  contaminated  area,  with 
the  or.s  exception  of  moving  on  foot  -  while 
he  continues  moving,  he  receives  only  contam¬ 
ination  cn  his  hands,  legs  and  feet  (see 
Chapter  3,  Section  2  for  more  details). 


LINE  16 


The  DETECTION  routine  is  called. 


I  IN  E  17 


The  DOSE3  routine  is  called  to  compute  the 
dose  received  while  crossing. 


LINE  18 


The  CEEMCAS . EFFECTS  routine  is  called  to 
assess  the  impact  of  the  dosage  recived 
during  this  iteration. 


1  ROUTINE  CROSSING 

2  P  El  ST  1  LISE  THUS 
ROUTINE  CBCSSISG  CALLED 

3  I?  CHEHDET  (SCLDIER)  *  1,  GO  TO  NEXT 

4  OTHERWISE  FCE  J  =  1  TO  M. AGENT.  DO 

5  IF  DEP.fl.CLD  (J)  IS  MOT  EQUAL  TO  0,  GO  TO  DETECT 

6  R EG  ABDLESS  LCCP 

7  FOB  J  =  1  TO  N. AGENT  ,  DO 

3  IF  DEF.G.CDBfl  (J)  IS  GE  KIM. G  . CHEH  (J) 

9  LET  T.CHERCURR  =  (  <BI  M.  G  .CHEX  ( J)  /DEP.  G.  CURB  ( J)  )  *DELT  )  ♦  TL 

10  THEN  IF  Cr  IS  NOT  EQUAL  TO  5 

11  THEN  IF  DEFSUH  IS  NOT  EQUAL  TO  5 

12  LET  T.  CONTAfl  (SOLDIER)  =  T.CHEHCURR 

13  LET  CONTAMINATED  (SOLDIER)  *  1 

14  LIST  T  .  CCNTAM  (SOLDI  ER)  #  COSTAHINATED (SOLDIER) ,  T.CHEHCURR 

15  REGARDLESS  LCCP 

16  'DETECT'  PERFCSli  DETECTION 

17  'NEXT'  CALL  DCSE3 

13  CALL  CHEMCAS. EFFECTS 

19  RETURN 

20  END  "OF  ROUTINE  CROSSING 


16.  The  Routine  COS  S3 


Purpose : 

The  ECSE3  routine  computes  the  accumulated 
dose  for  each  agent  in  situations  where  the 
PERSON  is  crossing  an  area  of  previous  chem¬ 
ical  contamination. 


ROUTINES  CALLED  BY  D0SE3 


DEPOSITION 
DOSE  1 

DCSE3. COMP 


TEMPORARY  ATTRIBUTES 


INTEGER 


This  attribute  indicates  the  current  level  of 
collective  protection  afforded  the  PERSON 
Values: 

1  -  A  vehicle  with  an  operating  ever  treasure 

system 

2  -  A  vehicle  without  an  overpressure  system 

3  -  A  bun  her  or  building 

4  -  A  foxhole,  with  or  without  temporary 

overhead  cover 

5  -  No  protection  (the  PERSON  is  in  the  open) 


DEPNUM 


This  attribute  gives  the  relative  defilade  of 

the  PERSON  at  any  given  time 

values: 

1  -  in  a  foxhole 

2  -  prone 

3  -  crawling 

4  -  kneeling  or  sitting 

5  -  standing 


TEMPORARY  ATTRIBUTES 


REAL 


T .  DECO  N 


This  attribute  gives  the  time  at  which  the 
process  of  decontamination  was  completed,  to 
include  the  donning  of  full  chemical  protec¬ 
tion  after  decontamination. 

Value:  The  time  as  given  above 


I. MASK 


This  attribute  stores  the  time  at  which  the 
PERSON  finished  donning  his  protective  mask. 
Value:  The  time  as  given  above 


GIOEAL  VARIAELES 


INTEGER 


N  .  AG  E  N  T 


This  variable  gives  the  maximum  number  of 
agents  that  will  be  usc-i  in  a  given  scenario. 
Value:  As  given  above 


SCLDIER 


This  variable  is  used  :o  conveniently  refer 
to  the  memory  location  of  the  PERSON  which  is 
currently  being  checked  in  the  model. 

Value:  SOLDIER  =  PERS  FTR  (  NAME  (PERSON)  ) 


GIOEAL  V  ARIAELES  REAL 


AG. DECAY  (1-D) 


This  array  Provides  the  amount  of  decay  of 
each  agent  due  tc  weathering  tha*  car.  be 
expected  to  occur  in  the  interval  DELT.  It 
is  multiplied  by  the  deposition  DEP.G.OLD  at 
the  beainning  of  the  intsrval  to  visld  the 
value  at  the  end  of  the  interval. 

Dimensions:  N. AGENT 

Value:  As  aiver.  above,  for  each  agent. 


AG. PICKUP  (1-D) 


This  array  serves  as  a  conversion  factor  to 
convert  'the  deposition  on  the  ground 
■DEP.G.CURR  in  a  contaminated  area  to  the 
deposition  that  would  be  found  on  the  surface 
of  personnel  ar.d  vehicles  crossing  that  area 
-  thus,  it  represents  the  percentage  of  the 
agent  picked  up  m  traversing  a  contaminated 
a  rea . 


Dimension:  N.  AG  ENT 

Value:  As  given  above,  for  each  agent 


AGA.  CUMDOS  E  (1-D) 


This  array  holds  the  accumulated  IV  dosage 
for  each  agent. 

Dimension:  N. AGENT 

Value:  The  dosage  in  mg  accumulated  up  to  the 
current  time 


AGA.  DECON.  DCSE  (1-D) 


This  array  holds  the  averaqe  dosage  for  each 
agent,  in  mg,  than  the  PERSON  will  receive 


durina  each  DELT  interval  while  he  is 
performing  decontamination. 


Dimension:  M . AGENT 

Value:  A  dosage  in  mg,  which  is  the  total 
dose  received  durirc  deccn tamina- ion 
divided  by  the  number  'of  DSLT  intervals 
it  takes  to  perform  the  decontamination. 


DEP.  G.CURR  ( 1- D) 


This  array  holds  the  current  values  for  the 
deposition  on  the  ground  at  the  location  of 
the  PERSON. 

Units :  mg/  sq.  cm 
Dimension:  N. AGENT 

Values:  As  given  above  for  each  agent 


DEP.  G .  OLD  (1-D) 


This  array  holds  the  most  recent  values  for 
the  deposition  on  the  around  at  the  location 
of  the  PERSON.  This  information  was  obtained 
during  the  last  iteration  cf  the  model. 

Units :  mg/  sq.  cm 
Dimension:  N. AGENT 

Values:  As  given  above  for  each  agent 


T. CUR RENT 


This  variable  gives  the  current  simulation 
time  within  the  main  combat  model  calling  the 
chemical  effects  routines. 

Value:  The  time  as  given  above 


TA.PF.CHEH  (1-D) 


This  array  provides  the  time  that  the  current 
level  cf  individual  chemical  protection  was 
denned,  for  each  body  area. 


This  variable  gives  the  simulation  time 
within  the  main  combat  model  at  the  time  of 
the  last  iteration. 

Value:  The  time  as  given  above 


RECURSIVE  VARIABLE  INTEGER 


This  variable  is  used  pass  the  agent  type  of 
the  agent  concerned  between  this  routine  and 
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the  DCSE3C0S P  routine,  which  is  a  routine 
written  for  the  STAR  implementation  that  ices 
the  actual  computation  of  the  dosages. 

Value:  The  iteration  index  j  (the  agent 

concerned)  . 


RECURSIVE  VARIABLES  REAL 


DEF  (1-D) 


This  array  is  used  as  an  argument  to  pass  *he 
ground  deposition  and  air  concentration 
avveraoed  between  the  beginning  and  end  of 
the  time  interval  over  which  the  dosage  is  to 
be  coirruted. 

Dimension:  2 
Value : 

1  -  The  averaae  deoosition  on  the  ground. 

2  -  The  average  concentration  in  the  air. 


T.  INT 


This  variable  serves  tc  store  the  value  of  an 
intermediate  time  between  T  .OLD  and 
T. CURRENT,  if  any.  It  is  used  as  an  argue- 
ment  to  mass  the  beginning  or  end  cf  a  time 
interval'  to  the  routines  DEPOSITION  and 
D0SE3  •  COMP. 


I. OLD 


This  variable  is  used  tc  store  the  value  of 
the  beginning  of  a  time  interval  for  dose 
computations.  It  is  egual  to  TL  is  decontami¬ 
nation  did  not  end  during  DELT;  eaual  to 
T.DECCN  if  decontamination  did  finish  d urine 
DELT.  It  is  used  as  an  arguement  to  pass  the 
beginning  of  a  time  interval  to  the  routines 
DEPOSITION  and  D0SE3.  COMP. 


ERIEF  EXPLANATION  OF  CODE: 


LINES  7-10 


The  routine  begins  by  adjusting  the  exterior 
deposition  DEP.G.CURs  by  the  AG. PICKUP  factor 
for  all  agents. 


LINES  12  -  15 


The  next  check  made  by  the  routine  sees  if 
the  time  that  decontamination  is  complete  is 
greater  than  or  equal  to  the  current  time.  If 
it  is,  then  the  dosage  received  has  been 
computed  with  the  DECON  routine  and  so  the 
DCSE3  calculations  are  not  needed.  The 


routine  will  add  the  average  dosage 
accumulated  over  DELT  during  decontamination, 
stored  in  the  array  AGA. DECON.DOSE,  to  the 
accumulated  dosage  value  in  array 
AGA . C U MOOSE ,  for  each  agent,  then  return  to 
CROSSING. 


LINES  16  -  19 


The  next  check  that  is  made  is  to  see  if  the 
dosage  calculations  pertain  to  the  one  excep¬ 
tional  situation  -  a  CP  value  and  DEFNtJM 
value  of  5,  indicating  a  PERSON  crossirg  on 
foot,  remaining  upright.  If  the  case  is  not 
exceptional,  the  normal  dosage  calculations 
apply,  so  the  routine  DCSE1  is  called. 
Otherwise,  the  same  general  procedures  as  are 
used  in  DOSE  1  are  applied  in  the  lanes  that 
follow,  only  dosage  is  only  accumulated  over 
the  body  areas  5,  6  and  7. 


LINES  22  -  23 


If  decontamination  had  been  completed  during 
the  last  DELT  seconds.  the  routine  comnutas 
the  dose  since  decontamination  was  completed 
by  setting  the  beginning  of  the  interval  over 
wnich  the  dose  is  to  be  computed,  T.OLD,  to 
the  time  decontamination  was  completed, 
T.DECCN. 


LINES  26  -  36 


Checks  to  see  if  masking  or  donning  of  any 
individual  items  occurred  during  the  DELT 
period  of  interest.  If  masking  or  denning  an 
item  had  been  completed  during  the  DELT 
period,  dosaoe  calculations  are  performed  at 
the  old  level  of  protection  until  the  new 
level  was  completely  assumed,  then  at  the  new 
level  cf  protection. 


LINES  28  -  34 


Checks  to  see  if  two  or  more  events  occurred 
during  DELT;  if  they  have,  the  dosage  is 
first  computed  over  the  interval  T.OLD  to 
T.INT .  than  T.OLD  is  assigned  the  value  T.  INT 
so  tne  remaining  lines  will  compute  the 
remaining  dosage;  that  received  after  the 
original  time  T.INT. 


LINES  32;  41;  43;  45 


The  routine  calls  the  D0SE3.C0MP  routine, 
which  actually  computes  the  dosaae  received 
during  appropriate  interval  and  assians  the 
cumulative  dose  to  the  array  AGA.  CUMEOS E  for 


each  agent.  Beth  inhalation  and  Dercut ar.ecus 
dosages  ara  considered,  and  converted  no  ar. 
equivalent  intravenous  (17)  dose. 


os 

1  ROUTINE  DOS E 3 

2  DEFINE  7 . C1D ,  I. 1ST  AS  0 -CIS  ENS  ION  AL,  REAL  VARIABLES 

•3  DEFINE  AG  AS  A  C-DI B ENS IC HAL ,  INTEGER  VARIABLE 

4  DEFINE  D£F  AS  A  1-DIBENS  IONAL,  SEAL  ARRAY 

5  PRINT  1  LINE  THUS 

ROUTINE  DOSE3  CALLED 

6  RESERVE  DEP  (*)  AS  N. AGENT 

7  FOR  J  =  1  TC  N. AGENT ,  DO 

3  LET  DEE.G.CURR  (J)  *  HAX.Ff  DE E. G . CURR (J) *  AG. PICKUP (J)  , 

9  DEE. G. CLD  (J)  *AG.  DECAY  ( J)  ) 

10  LOOP 

11  LIST  DEE.G.CORR,  AG. PICKUP,  DEP. G. OLD,  AG. DECAY 

12  IF  T.DECCN  (SOLDIER)  IS  GT  T. CURRENT, 

13  FOR  J  =  1  TO  N.  AGENT,  LET  AGA.CUBDOSE (J)  =*  AGA .CUBDOSE ( J) 

14  ♦  AGA. CECCN.  DOSE (J) 

15  RETURN 

16  OTHERWISE  IF  (CP(SOLDIEH)  IS  NOT  EQUAL  TO  5)  OR 

17  (DEFNUH  (SOLDIER)  IS  NCT  EQUAL  TO  5) 

13  CALL  CCSE1 

19  RETURN 

2'J  OTHERWISE  LET  I.  IN?  =  0 

21  LET  T.OLD  -  II 

22  IF  T.DECCN  (SC1DIER)  IS  GT  TL,  LET  T.OLD  *  T. DECON  (SOLDIER) 

23  HEGARDLESS 

24  IF  (T.  BASK  (SOLDIER)  IS  GT  T.  OLD)  AND  ( T.  BASK  (SOLDIER)  IS  ITT. CURRENT) 

25  LET  T.INT  =  I  .B  AS  K (SO  LDIE R) 

26  REGARDLESS  FOR  I  -  1  TO  7,  DO 

27  IF  (TA.PF.CHEB(I)  IS  GT  T.OL C) AND (TA. PF.CHEB  (I)  IS  LT  T. CURRENT) 

23  IP  T.INT  IS  SOT  EQUAL  TO  0 

29  FOR  J  =  1  TC  N. AGENT,  DO 

30  LET  AG  =  J 


CALL  DEPOSITION  GIVEN  T.OLD, 
CALL  DOSE3.COBP  GIVEN  T.OLD, 
LCCE 


T.INT  AND  AG  YIELDING  DEP(*) 
T.INT,  AG  AND  DEP(*> 


34 


LET  T.OLD  *  T.INT 


35  REGARDLESS  LET  T.INT  *  TA .PF.CHEB (I) 

36  REGARDLESS  LOOP 

37  FOR  J  a  1  TO  N. AGENT,  DO 

38  LET  AG  =  J 

39  IF  T.INT  IS  NCT  EQUAL  TO  0 

40  CALL  DEPOSITION  GIVEN  T.OLD,  T.INT  AND  AG  YIELDING  DEP (*) 

41  CALL  CCSE3.CCKP  GIVEN  T.OLD,  T.INT,  AG  AND  DEP  {*) 

42  CALL  DEPOSITION  GIVEN  T.INT,  T. CURRENT  AND  AG  YIELDING  DEP (*) 

43  CALL  CCSE3.CCBP  GIVEN  T.INT.  T. CURRENT,  AG  AND  DEP(*) 

44  ELSE  CALL  DEPOSITION  GIVEN  T.OLD.  T. CURRENT  AND  AG  YIELDING  DEP(*) 

45  CALL  D03E3.CCBP  GIVEN  T.OLD,  T. CURRENT,  1G  AND  DEP(*) 

46  REGARDLESS  LOOP 

47  RETURN 

48  END  "OF  ROUTINE  DOSE3 


APPENDIX  D 

IBPLEMENTATION  IN  STAR 


A.  ISSUES 

1 •  Time  of  Implementation 

Implementing  a  combat  model  intended  to  be  a  module 
within  a  high-  resolution  main  combat  simulation  such  as 
STAR  is  a  long  and  involved  procsss.  There  are  many  issues 
to  be  addressed  to  insure  that  the  main  combat  simulation 
provides  the  input  required  by  the  model,  the  model  provides 
the  output  desired  to  the  main  simulation,  ana  the  data 
structures  and  commands  are  comparable  without  errors  such 
as  multiply  defined  global  variables,  etc. 

The  first  issue  addressed  is  the  time  at  which  the 
chemical  agent  effects  model  is  to  begin  operation.  There 
are  two  possibilities:  one  choice  is  to  create  the  entities 
at  the  beginning  of  the  simulation  run;  input  the  vari¬ 
ables, etc.,  and'  in  general  perform  all  the  necessary 
housekeeping  tasks  required  to  place  the  module  into  opera¬ 
tion  at  the  beginning.  The  model  can  than  be  invoked 
immediately  or  at  the  point  in  the  scenario,  if  known,  where 
chemical  agents  are  tc  be  first  employed.  The  alternative 
procedure  is  to  slow  down  the  simulation  a  bit  at  the  mcment 
the  first  appearance  cf  chemical  agents  occurs;  this  reduces 
the  memory  and  other  requirements  up  front  but  forces  sched¬ 
uling  many  requirements  at  some  point  during  the  simulation. 

The  best  approach  depends  on  the  scenario  tc  be 
exercised.  Given  the  relatively  short  real  time  lenqths  of 
scenarios  exercised  on  STAR,  four  possible  situations  may 
occur.  The  first  involves  a  non-chemical  scenario.  Although 
these  are  becoming  increasingly  less  common  as  the  emphasis 
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cn  integrating  nuclear  and  chemical  considerations  into 
modelling  has  its  effect  on  the  scenarios  developed,  there 
are  still  many  generally  accepted  scenarios  used  that  dc  net 
involve  chemical  play.  In  this  situation,  implementation  is 
moot . 

A  second  possibility  is  modelling  first  use  of  chem¬ 
icals,  most  likely  at  the  outset  of  battle  as  part  of  the 
preparatory  fires.  This  option  may  restrict  chemical  use  to 
one  side  only,  as  reaction  times  may  prevent  retaliation  in 
the  first  few  hours  of  combat  modelled.  The  module  should 
be  implemented  at  the  onset,  with  the  probabilities  of 
treating  artillery  attacks  as  chemical  attacks  set  lew  at 
the  onset,  and  increased  as  the  battle  continues. 

The  third  situation  would  involve  modelling  a  battle 
at  some  point  in  time  after  chemicals  have  been  initially 
employed.  This  will  require  immediate  implementation  of  the 
model,  with  many  if  not  all  forces  in  high  degrees  of  chem¬ 
ical  protection,  and  high  probabilities  of  treating  attacks 
as  potentially  chemical  in  nature. 

The  final  possibility  is  the  initiation  of  chemical 
play  at  seme  point  after  the  battle  has  begun.  In  this 
instance,  it  may  be  desirable  to  implement  to  chemical 
effects  model  at  the  time  that  chemicals  are  introduced, 
rather  than  at  the  beginning  of  the  simulation. 

2  •  Tasks  Required  to  I inclement  Model 

There  are  twe  major  tasks  required  to  implement  the 
model.  First,  the  temporary  entities  PERSON  and  ALARM  will 
need  to  be  created.  Currently,  neither  of  those  entities 
are  considered  outside  of  the  chemical  effects  model  and  a 
nuclear  damage  assessment  model  under  development.  when 
these  entities  are  created,  the  arrays  whose  pointers  are 
stored  as  attributes  must  be  reserved,  and  a  few  (such  as 
AGA.  IMPAIR  and  AGA.  INCAP)  must  be  initialized.  The  general 
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concept  for  crsating  these  entities,  as  developed  o y  ITC 
Kelleher,  formerly  Chief  of  the  ISADOC  Research  Element, 
Monterey,  and  modified  by  the  author,  is  tc  access  each  UNIT 
in  the  sets  3LUE.  ALIVE  and  RED.  ALIVE  and  determine  whether 
the  unit  has  a  crew.  If  it  does,  then  those  entities  ar* 
created,  and  they  are  filed  in  the  set  CREW  (UNIT)  .  It  is 
possible  that  a  PERSON  entity  will  represent  the  UNIT.  If 
so,  the  initialization  routine  should  create  the  PERSON  rad 
store  the  entity  pointer  in  the  attribute  HUM  AN (UNIT) .  For 
each  PERSCN ,  the  entity  pointer  of  the  UNIT  is  stored  in  the 
attribute  ESSENCE ( PE ESON)  .  The  lethal  dose  threshold  distri¬ 
bution  is  determined  from  the  distribution  D.LETH,  and  the 
global  variables  D. IMPAIR  and  D. INCAP  are  used  to  generate 
the  impairment  and  incapacition  dose  thresholds,  respec¬ 
tively.  Ihe  UNIT’S  PLATOON  should  be  accessed  to  de- ermine 
the  appropriate  vector  of  protection  factors  to  be  imple¬ 
mented;  these  can  be  stored  in  the  array  CHANGE.  ORDER  whose 
pointer  is  stored  in  the  attribute  CHEM. CHANGE.  The  UPDATE 
routine  will  automatically  update  the  protective  status  and 
assess  leakage  factors  where  appropriate.  The  X. CURRENT  and 
Y. CURRENT  attributes  should  be  set  st  the  UNIT'S  X. CURRENT, 
Y. CURRENT.  The  CP  and  DEFNUM  of  the  FERSON  should  be 
determined  from  the  current  situation. 

In  addition  to  creating  the  entities,  the  global 
variables  and  attributes  peculiar  tc  the  PERSON  need  to  be 
read  in.  The  user  input  requirements  are  given  in  Section 
B,  below.  Basically  there  are  two  types  of  input  required. 
The  first  are  the  probabilities  and  probability  distribu¬ 
tions  that  drive  the  actions  taken  by  the  PERSONS  modelled. 
The  second  type  of  input  are  the  physical  constants  and 
characteristics  pertaining  to  the  chemical  agents  or  PERSONS 
and  ALARMS  modelled. 


3.  Interfaces 

There  are  several  interfaces  chat  need  to  be 
worked  cut  between  STAR  and  the  chemical  agent  effects 
model.  Ike  first  type  is  the  inputs  required  by  the  model 
from  STAB.  The  NUSSE  II  model,  as  modified  to  run  cn  STAR, 
must  be  setup  so  that  it  can  be  called  from  the  routine 
UPDATE  and  will  provide  a  value  for  the  ground  deposition  in 
mg  /  sg.  cm  and  the  air  concentration  at  2  meters  in  mg  / 
cubic  meter.  A  routine  will  need  to  be  developed  to  figure 
cut  in  which  grid  the  PERSON  is  located,  so  the  proper 
values  can  be  accessed. 

The  means  of  placing  information  in  the  A. ROUND 
queue  must  be  developed.  Generally,  whenever  a  PERSON  is 
placed  in  a  set  VICTIM  (which  occurs  whenever  the  PERSON  is 
within  the  ellipse  cf  effect)  ,  the  time  and  nature  of  the 
round  that  initiated  this  placement  should  be  added  tc  the 
A. ROUND  array  at  location  RDPTR  +  1,  and  then  RDPTR  must  be 
incremented  by  1. 

A  subroutine  within  the  main  model  must  be  written 
to  tie  in  CP  and  DEFNUM  changes  directed  by  the  main  simula¬ 
tion  and  the  CP  and  DEF N UM  attributes  belonging  to  the 
PERSON.  In  addition,  if  the  PERSON  enters  a  vehicle,  his 
VEH.NC  attribute  must  reflect  the  NUMBER (VEHICLE)  and  he 
must  be  placed  in  the  set  CR EH (VEHICLE) .  In  addition, 
changes  in  the  UNIT’S  X. CURRENT,  Y. CURRENT  must  change  the 
associated  PERSON’S  attributes  X. CURRENT,  Y. CURRENT. 

ether  routines  that  should  be  added  to  effectively 
utilize  the  chemical  effects  model  are  discussed  in  Chapter 
4.  This  model  will  not  reach  its  full  potential  until  these 
chanaes  are  realized. 


B.  COMPOTES  ROUTINES  FOR  I  HPLEMEHTATION 
1  •  Ecutines  For  Imp  Is m  ent  at  ion 

a.  PREAMBLE 

The  FRE AMPLE  enclosed  provides  the  definitions 
of  all  of  the  variables  and  entities  used  in  the  model.  It 
should  be  appended  to  the  PREAMBLE  of  the  main  simulation 
after  a  check  for  common  variable  names  has  been  made. 

fc.  MAIN  (driver  pregram) 

The  driver  program  used  to  test  the  routines 
independently  has  been  included.  The  lines  dealing  with  the 
creation  cf  entities  and  the  reservation  and  initialization 
cf  arrays  should  be  ac  particular  interest. 

c.  0SER1.INE0T 

This  routine  was  used  to  read  in  and  echo  all 
user-input  varibles  dealing  with  probabilities  and 
probability  distributions. 

d.  USER  2. 1 N  PUT 

This  routine  was  used  to  read  in  and  echc  all 
user-input  varibles  dealing  with  physical  constants  and 
characteristics. 

e.  II  ST. ATTRIBUTES 

This  routine  was  used  to  provide  a  printout  of 
the  arrays  belonging  to  the  PERSON  that  are  stored  in  attri¬ 
bute  pointers  (listing  the  associated  attributes  simply 
provides  a  memory  location  number)  . 
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f.  DISTRIB 


This  routine  is  used  as  a  function  to  provide 
random  numbers  from  a  choice  of  six  distributions: 
Deterministic,  Uniform,  Exponential,  Normal,  Lognormal,  and 
Beta.  It  is  called  as:  DISTRIB  (Vector  Pointer),  where  the 
vector  is  configured  (Distribution  type,  1st  parameter,  2nd 
parameter).  The  routine  uses  random  number  input  streams 
number  1;  this  may  be  changed  if  desired. 

2.  Routines  For  Debugging 

a.  NUSSSII 

This  routine  was  used  to  simulate  the  ground  and 
air  depositions  and  concentrations  on  a  simple  20  x  20  grid 
(lower  left-hand  corner  coordinate  is  the  origin)  .  This 
routine  bears  no  resemblance  to  the  ual  NUSSE  II  model  but 
can  be  helpful  in  debugging  routines  without  implementing 
the  main  model. 

b.  ARTILLERY.  DRIVER 

This  routine  was  used  to  simulate  two  battery 
volleys  -  one  conventional,  one  chemical,  at  a  location  near 
the  PERSON  ty  providing  input  to  the  array  ROUND  and  the 
attribute  RCPTE  (PERSON) . 

3 .  Routine  Codes 


CODE 


1 

2 

3 

4 

5 

6 
7 


it********  MASTER  PRO 5 BA 3  ************* 

PB2ABELE 

NORMALLY ,  MODE  IS  BEAL  AND  DIMENSION  =  0 
GENERATE  IISI  ROUTINES 
TE8PCRABI  ENTITIES 

EVEBY  VEHICLE  HAS  A  NUMBER  AND  AN  OPEN. CLOSED  AND  OWNS  A  CBEB 
EVERY  ALARM  HAS  A  WARNING,  AN  X. ALARM,  AND  A  Y. ALARM 
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EVES*  PERSON  HAS  A  DEF.GMD,  A  DEP. AIR,  A  VEH. NO, 

A  T.MASK,  A  T.  CHEM  GET,  A  MASK.  A  .1  A SKLE AK.  A  D  E  F  N  U  M , 

A  CP,  A  T.CHC,  A  T.CP,  A  PF.CHEM,  A  ?F. LEAK ,  A  T. PF.CHEM, 

A  CHEM. CHANGE,  A  T. AG. IMPAIR,  A  T. AG. INCAP,  A  T.LETH, 

A  T.DECCS,  AH  OLD X  ,  AN  OLDT,  A  CH2KDET,  AN  AG. DECCH. DCSE, 
AN  AG.CUMDCSE,  AN  AG. IMPAIR,  AN  AG. INCA?,  AN  AG. LETS, 

A  COLOR,  A  VEH. SYS. TYPE,  A  VEH . WPN.  TY PE,  AN  ESSENCE, 

A  ROUND,  A  RDPTR,  A  CONTAMINATED,  A  T.CONTAM,  AN  ANTIDOTE, 
A  T.NAA,  AN  X. CURRENT,  A  Y. CURRENT,  AND  A  NAME 
AND  MAY  BELONG  TO  A  CREW. 

• ' VEHICLE  ATTRIBUTES 

DEFINE  NUMBER,  OPEN.CLCSED  AS  INTEGER  VARIABLES 
••ALARM  ATTRIBUTES 

DEFINE  WARNING  AS  AN  INTEGER  VARIABLE 
DEFINE  X. ALARM  AND  Y. ALARM  AS  VARIABLES 
•'ATTRIBUTES  SERVING  AS  ARRAY  POINTERS 

DEFINE  DEP.GND,  DEP. AIR,  CHEH .CH ANGE,  T. AG. IMPAIR,  T. AG. INCAP, 
AG. DECCH. DCSE,  AG.CCMDOSE,  AG.  IMPAIR,  AG. INCAP,  AG.LETH, 
T.PF.CHEM,  Pf.CHEM,  FF. LEAK,  ANTIDOTE,  ROUND 
AS  INTEGER  VARIABLES 
••ATTRIBUTES  STORING  INTEGER  VALUES 

DEFINE  CF,  MASK,  ESSENCE,  CHEN DEI,  RDPTR,  DEFRUM, 

COLOR,  VEH. SYS. TYPE,  VcH . UP N. TYPE,  CONTAMINATED, 

VEH.HC,  AND  NAME  AS  INTEGER  VARIABLES. 

••ATTRIBUTES  STORING  TIMES  OF  ACTIONS  IAKEN 

DEFINE  T.MASK,  T.  CH2MDET,  T.DHC,  T.CP,  T.DECON,  T.CONTAM, 

T.NAA  AS  VARIABLES 
••ATTRIBUTES  STORING  REAL  VALUES 

DEFINE  MASKLEAK,  OLDX,  CLDY,  X. CURRENT,  Y.CURP.ENT 
AS  VARIABLES 

••GLOBAL  VAFIABLES  SUBSCRIPTED  BY  AGENT 

DEFINE  CEP. G. OLD,  DEP. A. OLD,  AG. DECAY,  OLD. DOSE,  DCR , 

ABS,  AG.  IN.'IAL.  FACTOR  ,  HI  N.  G  .  CH  EH,  XIN.A.CKEM,  AG.  PICKUP, 


0.  IMPAIR.  D.INCAP,  AGENT. TYPE 
AS  1-DIM5SSI0N4L  VARIABLES 


••GLOBAL  VARIABLES  WITH  DIFFERENT  VALUES  FOR  EACH  SIDE 
••  AND  SUBSCRIPTED  BY  BCCY  AREA  OS  AGENT 

DEFINE  PF.MAX,  AG. AL. TFRESH,  PC. ?F. LEAK  AND  SKIN 
AS  2-DIMENSIONAL  VARIABLES 

••GLOBAL  VARIABLES  WITH  DIFFERENT  VALUES  FOB  EACH  SIDE 
DEFINE  FC.CEL.DECON,  PC.NAA,  PC.CHC, 

PC. MASK,  FC.HSKLEAK,  PC. MOP?,  PC. IMM . DECON ,  AL.MAX.DIST, 
NAA.FACICR,  MULT.AG. DECON 
AS  1 -DIMENSIONAL  VARIABLES 

••GLOBAL  VARIABLES  WITH  DIFFERENT  VALUES  FOB  t »CH  SIDE 
••AND  HAVING  A  3ECOKC  DIMENSION 

DEFINE  DT.MASK,  DT.NAA  AS  2-DIMENSIONAL  VARIABLES 
••GLOBAL  TIME  VARIABLES 

DEFINE  T. CURRENT,  TL,  T.CHEM.CUR?.,  AMD  DELI  AS  VARIABLES 
"ARRAYS  WHOSE  POINTERS  ARE  STORED  AS  ATTRIBUTES 
DEFINE  CEP.G.CURR,  DEP.A.CUHR,  PFA. CHEfl,  PFA. LEAK, 

TA. PF.CHEM,  TA.INCAP,  TA. IMPAIR.  AGA . CUMDOSZ,  AGA. IMPAIR, 
AGA.IHCAP,  AGA.LETH,  AGA . DE CON . DOSE,  A. ANTIDOTE 
AS  1  -  Cl  ME  KS  ION  AL  VARIABLES 
' 'OTHER  DECLARATIONS 

DEFINE  SOLDIER,  OLDCP,  CHEMSIT  AND  SIDE  AS  INTEGER  VARIABLES 
DEFINE  N. PERSON,  N  .  VEH  .  S YS . T Y FE .  N. VEH . WPN. TYPE,  N. VEHICLE, 

N.  ALARM,  N.  SIDS  AND  N. AGENT  AS  INTEGER  VARIABLES 
DEFINE  DISTRIE  AS  A  REAL  FUNCTION 
DEFINE  A. POUND  AS  A  2- CIMENSI ON A L  ARRAY 

DEFINE  VEH. FTP,  ALPTR,  ESRSPTR  AS  1 -DIM ENSIONAL,  INTEGER  ARRAYS 
DEFINE  CHANGE. ORDER  AS  A  2-DIM EM SIGNAL  ARRAY 
DEFINE  D.LETH  AS  A  2- D THEM SIO N AL  ARRAY 
DEFINE  CT.PF  AS  A  4-DIMENSIONAL  ARRAY 
DEFINE  CT. DETECT  AS  A  5-DIMENSIONAL  ARRAY 
DEFINE  PC. ACT . OHC  AS  A  2-DIMENSIONAL  ARRAY 
DEFINE  DT. OHC  AS  A  3-DIHENSIQ.NAL  ARRAY 
DEFINE  CT.CECCN  AS  A  4-CIMENS IOKAL  ARRAY 
DEFINE  D. MSKLEAK  AS  A  2-DIMENSIONAL  ARRAY 
DEFINE  DEP. RED  AS  A  3- CIBENSI ON AL  ARRAY 
DEFINE  D. PF .LEAK  AS  A  3-DIMENSIONAL  ARRAY 
DEFINE  UPTR  AS  A  1 -DIM ENSIONA L  ARRAY 
DEFINE  SH. BREATHING  AS  A  3 -DIMENSIONAL  ARRAY 
DEFINE  SH. NEC. FILTER  AS  A  6-D IBENSIONAL  ARRAY 
"OP  PBEAHELE 
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CODE 


1  BAIN 

2 


DEFINE  I.O.K.L,!!  AS  O-DI SESSION  AL,  INTEGER  VARIABLES 
READ  N. VEHICLE,  N.ALARH,  N. PERSON,  N. VEH . SIS. TIPS,  N. VEH. W ?N. TI PE 
N.SIDE,  N.  AGENT 

LIST  N. VEHICLE,  3.ALA5B,  N. PERSON,  N. 7EH. SIS. TIPS,  N. VEH. WPS. TIPS 
N.SIDE,  N. AGENT 

RESERVE  V£H.FTR(*)  AS  N.  VEHICLE 
RESERVE  AIPTR  (*)  AS  N.ALARB 
RESERVE  FERSFIR  (*)  AS  N.  PERSON 
RESERVE  UPTR  ( *)  AS  3 

RESERVE  CEP. G.OLD(*) ,  DEP. A. OLD (*)  AS  S. AGENT 
RESERVE  CHANGE. ORDER  (*.*)  AS  N.  PERSON  BI  10 
RESERVE  C.LITHj*,*)  AS  N. AGENT  31  3 
RESERVE  D.INPAIF(*  ,  D.INCAP(*J  AS  N. AGENT 
RESERVE  AGENT. TIPS (*l  AS  N. AGENT 
FOR  I  *  1  TC  S. VEHICLE,  CO 
CREATE  A  VEHICLE 

READ  NUBEER (VEHICLE) ,  OPEN. CLOSED (VEHICLE) 

LET  VEH.PTR  (NUSBER)  ■  VEHICLE 
LIST  ATTRIBUTES  OP  VEHICLE 


LOOP 

READ  D. IMPAIR,  C. INCAP,  C.LET3 
LIST  D. IMPAIR,  D. INCAP,  D.LETH 
FOH  I  *  1  TC  N. ALARB,  DO 
CREATE  AN  ALARB 

READ  X. ALARM  (ALARB)  ,  I. ALARB  (ALARB) 

LET  ALPTR(I)  -  ALARB 
LIST  ATTRIBUTES  OF  ALARM 
LOOP 

FOR  1=1  TC  N. PERSON,  DO 
CRSATF  A  PERSON 

READ  NAME  (PERSON)  ,  .T  ASK  (P  ESS  ON) 

F2S3RVE  PEA. CKSMJ*)  AS  7 

ECS  J  =  1  TO  7,  READ  PfA.CHEB(J) 

READ  CP  (PERSON!  ,  VEH  .  SIS.  TIP  E  (PERSON)  , 

VEH. WFN.TXFE  (PERSON) ,  COLOR  (PERSON)  ,  X. 
I. CURRENT  (PE a SOU)  ,  AND  VE H. NO (PERSON) 


COBB ENT (PEBSON) , 


IP  VEH. NO  (PERSON)  IS  NOT  EQUAL  TO  0 

FILE  PERSON  IN  CR EH  (VEH. P TR ( VEH. NO) ) 
REGARDLESS 

LET  CHEK. CHANGE (PFRSON)  *  CH ANGE. ORDER (NA8E,*> 
FOR  K  =  1  TC  10,  LET  CHANGE. ORDER (NAME,*)  •  -1 
RESERVE  CEP. G.CORR(*J  AS  N. AGENT 
LET  DEP.  Gi.D  (PERSON)  =  CEP  .G.  CURR (*) 

LET  DEF.G.CURK(»)  =  0 

RESERVE  CEP.  A.  C'JR  R  (*)  AS  N.  AGENT 

LET  DEF.  AIR  (PERSON)  *  CEP.  A.  CURH  (•> 


•  •  INITIALIZE 


LET  DEE.  AIR  (PERSON)  = 
LET  DEE. A. CU F  E(*l  *  0 
LET  ?t  .C:iEB(PSRSON>  ■ 
LET  PFA.CHZM  (*)  =  0 

•  FESE3VE  PEA.  LEAK  <*)  A 
LET  ?P. LEAK  (PERSON)  ■ 
LET  ?F A.  LEAK  (*)  ■  0 

RESERVE  T A. r.  .CH  E  B (*) 
LET  I. PF.CHEB  (PERSON) 
LET  TA.P?.CHEH(«)  ■  0 


■  PPA.  CH  EB  ( *) 

AS  7 

■  EFA.LS  AK  (*) 

1  AS  7 

i  ^  TA.  PP.CHEB  (*) 


LET  I. PF.CHEM  (PERSON)  =  T  A.  P  P.  C  HEB  (*) 

LET  TA.P?.CHEH(«)  ■  0 

RESERVE  TA.INFAIR  (*)  AS  N. AGENT 

LEI  T. AG. IMPAIR (PERSON)  »  TA.IBPAIR(*) 


IET  TA.IMFAIFf*)  =  0 

RESERVE  TA. INCAP  (*)  AS  N.  AGENT 

LET  T. AG.INCAF(PERSON)  =  TA.  IN 


LET  TA.INCAP(»)  ■  0 
FESERVE  AGA. CECON.DOSE  (*)  AS  N. AGENT 
LET  AG. DECCN. DOSS  (PERSON)  =  AGA.DECON. 
LET  AGA. CfCON.OOSE(*)  «  0 
RESERVE  AGA.CUaDOSSm  AS  N.  AGENT 
LET  AG.CUBDOSE(PERSON)  ■  AGA .CUBDOSE (* 
IET  AGA. CUBOCSe (*)  ■  0 
RESERVE  AGA.  IETH  (*)  AS  N.  AGENT 


INC  AP  (♦) 


LET  AG . DECCN . DOSE 


AGA.DECON. DOSB(*) 


RESERVE  AGA. IETH ( 
LET  AG.LETH (PERSO 


H  (PERSON)  ■  AGA.LETH  (*) 

TC  N.  AGENT,  LET  AGA.LETH(J) 


cun  A#  —  )  AW  IH  AVIUU  f _ _  _ ,  ,  - _ _  _ 

RESERVE  AGA. IBPAI R(*J  AS  N. AGENT 
LET  AG.  IMPAIR  (PEBSON)  *  AGA.  IBPAIB  (*) 

FOR  J  «  1  TO  H.  AGENT,  SO 

LOOP^ET  *«»*IWAIB(J)  *  D.IBPAIK(J)  *  AGA.LETH  (J) 
BESEBVZ  AGA.  INCAP  (*)  IS  N.  AS  ENT 


-  DXSTBIB (  D.LETH  (J,*)  ) 


290 


LET  AG.INCAF  <P33SO!.')_  =  AG  A.  I  MCA?  (*) 
fOR  J  *  1  TO  AGENT,  DO 

LET  AG  A.  INCAP  (J)  »  C.  INCAP  (J)  *  AGA.LETH(J) 

LOOP 

LIST  NAME  (FEPSON)  ,  AG  A. IHPAI B,  AGA. INCAP,  AG A. LETS 

LET  AGA.  IBFAIR(*)  *  0 

LET  AGA.  INCAE  (*)  *  0 

LET  AGA.LEIHi*!  *  0 

RESERVE  A. ANTlbOTE(*)  AS  N. AGENT 

LET  ANTIDOTE  (PERSON)  *  A.  ANT  IDOTE  (*) 

FOR  J  *  1  TO  N.  AG  ENT.  LET  A.  ANTIDOTE  (J)  ■  1  "INITIALIZE 

LET  A. *NTICOTE(*)  *  5 


C.  INCAP  ( J)  *  AGA.LETH(J) 


RESERVE  A. SOUND**,*)  AS  50  BY  2 
LET  ROUND  (PERSON)  -  A.ROUND(*,«) 
LET  A. FOUND (*,*)  *  0 


LET  A. FOUND  (*,*)  *  0 

LET  OLDX  (PERSON)  *  X. CURRENT  (PERSON) 
LET  OLCY  (PERSON)  -  Y. CURRENT  (PERSON) 
LIST  ATTRIEUTES  OP  PERSON 
LOOP 

•SEAD  IN  AND  ECHC  GLOBAL  INPUT  VARIABLES 
CALL  U5ES1. INPUT  • 1  PRO  BABILI 

CALL  USER2. INPUT  "PHYSICAL 

LET  UPTR(I)  *  2  "FOR  DNIPO 

LET  UPTR  (2)  =  0 
LET  UPTR j3)  =  1 

LET  AGENT.  iYPE  (1)  *  1 

LET  DELT  =  10 
LET  T. CURRENT  =  liO 
LSI  SOLDIER  =  FERSPTR(IO) 

"  FOR  K  =»  1  TC  3,  00 

LET  I . CU6RENT  *  110*  (DELT  *  2) 

LET  TL  *  T. CURRENT  -  DELT 
LIST  T. CURRENT 
"  FOP  L  *  1  TO  5,  DO 
LET  (1=2 

LET  SOLD IER=FE ESPT R  (B) 

LET  DEP.G.CU5R  (♦)  =  DEP . GND  (SO  LDI HR) 

LET  DEP.  A.CCFR  (*|  *  D  £P.  AIR  (SOLDIER) 

LEI  PFA.  CHEM  (*)  =  ?F.  CHEH  (SOLD  IEP.) 

LET  PFA. LEAK!*)  =  PF. LEAK (SOLD IER) 


1  INITIALIZE 


"PROBABILITIES  S  DISXR IBOTIONS 

"PHYSICAL  CONSTANTS 

"FOR  ONIFORH(O.I)  RASDCH  DRAW 


"INITIALIZE 


LET  PFA. LEAK  (*)  = 


?F.  CHEH  (SOLDIER) 
PF.LEAK (SOLDIER) 


LET  IA  .  Pf  .  Cr  SCI  ( *)  -  I.  ?F.  CH2M(  SOLDIER) 

LET  IA.  IBP AI F  ( •)  =  T.  AG  .  IBP  AI R  (SOLDIE&) 

LET  TA . INCAF  (*)  *  T. AG . INCA P (S CLDIER) 

LET  AGA.CECCN.  COS  E  ( *)  *  AG.  D&CQN.  DOSE  (SOLDIER) 

LET  AGA.CUHCCSE  (*)  =  AG . CUM  DOS E  (SOLDIER) 

LET  AG  A.  IMPAIR  {•)  «  AG  .  IMPAIR  (  SOLDIER) 

LET  AGA.  INCAE  (*)  *  AG.  I  NCAP  (SOLDIER) 

LET  AGA  .  LECH  <*)  =  AG.  LE TH  (SOLDIER) 

LET  A. ROUND  (*, *)  *  ROU N C  (SOLDI EB) 

LET  A.  ANIIOCTE  (*)  *  A NTIEOTE(S OLDIER) 

LET  SIDE  *  CCLCR(SOLDIEH)  ♦  T 
LET  DEFNOH  (SOLDIER)  -  5 


LET  DEFNOH  (SOLDIER)  • 
CALL  CHEH. CHECK 
CALL  LIST. ATTRIBUTES 
"  LOOP 
"LOOP 
STOP 

END  "OP  HAIR  PEOGRAH 


'•PSOB.  5  DI3TR.  OP  MASK  LEAKS 


1  ROUTINE  US2R1.INEUT 

2  RESERVE  31.  PF  <*,*,*,♦)  AS  N.  VEH  .SYS. TYPE  BI  N.  VEH. HPN. TYPE 

3  ET  7  il  3 

4  RESERVE  DT.MASK  {*, *)  AS  N.SIDE  BT  3 

5  SSSEF7I  PC. MSKLEAK (*}  AS  N.SIDE 

6  RESERVE  I  .MSKIEAK  (*  ,  *)  AS  N.SIDE  BY  3 

7  RESERVE  E7. NAA  (*»*)  AS  N.SIDE  3Y  3 

8  RESERVE  PC. CHC  ( *)  As  N. SICE 

9  RESERVE  DT. OHC (*.*,*>  AS  N.SIDE  BY  3  BI  3 

10  RESERVE  PC.ACl.ofc  <*,*)  AS  N.SIDE  BY  2 

11  RESERVE  D. PF. LE A K( *,*.*)  AS  N.SIDE  31  7  BT  3 

12  RESERVE  PC.  Itlfl.  DECOR  (*)  #  PC.  DEL .  DECON  f*)  AS  N.SIDE 

13  RESERVE  PC.  EE .  LEAK  <*  ,*)  AS  N.SIDE  BT  7 

14  RESERVE  PC.NAA(*1  AS  N.SIDE 

15  RESERVE  DT. DETECT (*,*,*,*,*)  AS  4  BY  N. AGENT  BI  5  BY  2  BT  3 

16  RESERVE  PC.MASK<*),  PC.MCEPf*)  AS  N.SIDE 

17  (  RESERVE  CT. DECON  <*, •  ,♦, •)  AS  N.SIDE  BY  N. AGENT  BY  7  BT  3 

13  "READ  IN  AND  ECHC  GLOBAL  INPUT  VARIABLES 
20  " 

21  READ  DT.PP  "DISTRIBUTION  TIMES  TO  DON  PROTECTIVE  CLOTHING 

22  PHIKT  1  LINE  THUS 

23  ARRAY  DI.PF 

24  FOR  1=1  TO  N. VEH. SYS. TYPE,  FOR  J=1  TO  S. VEH . HPN .TYPE, 

25  FOR  K=1  TC  7,  DO 

26  FRINT  1  LINE  BIT H  I,  J.  K,  DT. PF (I.J, K, 1)  , 

27  DT.PF  (I,J,K,2)  ,  DT.PF(I,J ,K,3)  THUS 

28  I=«*  J=**  K=**  **  **  *3 

25  LOOE 

30  READ  DT. MASK  • ' DISTR.  OF  MASKING  TINES 

31  LIST  DT . MASK 

32  REAC  PC.a.SKLEAK,  D.HSKLEAK  "PROB.  S  DISTR.  OP  MASK  LEAKS 

33  LIST  FC.MSKLEAK,  D.MSKLEAK 

34  READ  DT. NAA 

35  LIST  DT. N AA 

36  READ  PC. CHC,  FC.ACT.OHC 

37  "  LIST  PC.OHC,  FC.ACT.OHC 

38  READ  DT. CHC 

39  "  PRINT  1  LINE  THUS 

40  "  ARRAY  CT. CHC 

41  "  FOR  K= 1  TO  N.SIDE,  FOR  L=1  TO  3.  DO 

42  "  ERINT  1  LINE  HIT H  K,  L.  DT. 0 HC  (K, L . 1)  , 

43  "  DT.OHC  (K,L,2)  ,  DT . OHC (K, L ,3)  THUS 

44  K  =  **  L***  ***.•*  ***.#*'  *«*.** 

45  LOOP 

46  READ  D.PF.LEAK 

47  PRINT  1  LINE  THUS 
ABRAY  D.PF.LEAK 

48  FOR  K=1  TO  N.SIDE,  FOR  L*1  TO  7 ,  DO 

49  FRINT  1  LINE  HITH  K,  L,  D. PF . LEAK JK, L , 11, 

50  D.PF.LEAK  (K,L,  2)  ,  D.  PF  .LE  AK  {  K,  L,3)  THUS 

K»**  l=**  ».*  ♦*.*<*  **.**• 

5 1  LOOE 

52  HEAD  PC. IMM. DECCN,  PC.DEI.DECON 

53  LIST  PC. IMM. DECCN,  PC. DEL.DECON 

54  HEAD  PC. PF. LEAK 

55  LIST  PC. FF. LEAK 

56  READ  PC.  NAA 

57  LIST  PC. N AX 

58  READ  DT*.  DETECT  "DISTR.  OF  CHEM.  DETECTION  PROBABILITIES 

59  PRINT  1  LINE  THUS 

60  ARRAY  DT. DETECT 

61  FOR  1=1  TO  4.  FOR  J=1  TO  N. AGENT,  FOR  K= 1  TO  5, 

62  FOR  L=  1  TC  2,  DO 

63  FRINT  1  LINE  HITH  I,  J,  K,  DT. D ETECT (I , J ,K,  1 , 1 ) , 

64  DT.  DETECT  (I,  J,K,  1,2)  ,  DT.  DETECT  (I ,  J  ,K,  1 , 3)  , 

65  DT .  DETECT  (I,  J,K,  2,  1),  DT. DETECT <I,J ,K, 2,2  , 

66  DT. DETECT  (I, J ,K, 2, 3)  THUS 

67  I=»*  J=**  K«»*  L= 1  *•  *•  •  *  L=2  **  **  ** 

63  LOOF 

69  READ  PC. BASK,  FC.flOPP 

70  LIST  PC. MASK,  EC.MOPP 

71  READ  DT.DECON 

72  PRINT  1  LINE  THUS  .  .  _ 

73  4RB4P0RTkD=C1,,T0  N.SIDE,  FOR  t  «  1  TO  N. AGENT,  FOB  I  -1  TO  7,  DO 

PRINT  1  LINE  HI^H  K,  l,  I,  DT.  DECOM  (K ,L, I,  1)  ,  DT.  DECON  (K,L,I,  2) 
75  CT. DECON <K,L,I,3)  THUS 


1  "XAO  Xf  u  tV|  L'i.UDiDV.l  If  H 

:. DETECT  (I,J,K,1 ,2  ,  DT.  DETECT  (I ,  J  ,K,  1 , 3)  , 

■ . DETECT  I,J,K,2,  1  ,  DT. DETECT (I, J ,K, 2, 2  , 
:. DETECT |I,J,K,2, 3  THUS 


K  =  **  L  «  ** 


78  END 


LOOF 

RETURN 


.wuu  in, i 

I  «  ** 


"OF  ROUTINE  US  ER1.  INPUT 
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CODS 

1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 
19 

1? 


27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 
39 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 


BOOTIN'  USES  2 . 1  '.1  PUT 

RESERVE  AG. DECAY!*)  AS  N. AGENT 

RESERVE  HIN.G.CKEl {*>,  3 IN. A. C3 EMJ*)  AS  N. AGENT 
RESERVE  PF.  HA X  (*,*)  AS  N.SIDE  87  7 
RESERVE  E  £P .  R  ED  <*,  *  ,  *)  AS  N.  AGENT  B13  B!  2 
RESERVE  AL.HAX.  CIST  (  *[  ,  NAA.  FACTOR  (*)  AS  N.SIDE 
RESERVE  A  BS  (*)  AS  N. AGENT 

RESERVE  AG.  AL. THRESH  <*,*)  AS  N.SIDE  37  M. AGENT 
B  ESER72  SKI N  J*. *)  AS  N.SIDE  BT  7 

RESERVE  SB. NeC. FILTER!*. ♦.*,*,*,*)  AS  N . V EH. STS.T7PE 
B 7  N. VEH. SEN. TYPE  ET  2  El  3  BY  2  B7  N. AGENT 
RESERVE  AG. INKAi. FACTOR  (*l ,  AG.PICKUP(*)  AS  N.  AGENT 
RESERVE  HULT.AG.DECON(*)  AS  N.SIDE 

RESERVE  SB.  BREATHING  (*,*,*)  AS  N.  VEH .  SIS .  TIPE  BI  N. 
RESERVE  CCR  (•)  AS  N. AGENT 
READ  3IN.G.C8EH,  BIN.A.CBEH 


VEH. 8PN. TYPE  BI  5 


1  1  HI NIHUN  SIGNIFICANT  GROUND  AND 
LIST  aiN.G.CHEH,  HI  N.A.CBEH  "AIR  DEPOSITIONS 

READ  PF. MAX 
LIST  PF . H AX 
READ  DEP. RED 
PRINT  1  LINE  THUS 
ARRAY  CEP. RED 
FOR  J  =  1  TO  H. AGENT,  DO 

1  LINE  KITH  DEP.REDIJ  ,  1,1)  ,  DEP .  RED  ! J  ,  1 , 2)  , DEP . RED  (J ,2 , 1 ) , 


24  PRINT  1  LINE  WITH  DEP.  RED  I J  ,  1 ,  1)  ,  DEP .  RED  (J  .  1 

2 1  DEP  .  RED  (J.  2  j2)  ,DEF  .R ED  JJ  j3  j  1)^ ,  DEP .  HEDJ J , 3 , 2)^THUS 


LOOP 

H  EAC  SN. NBC. FILTER 
PRINT  1  LINE  THUS 
ARRAY  SW  .NSC. FILTER 

FOR  K  *  1  TO  N.VSH. SIS. TYPE.  FO R  L  =  1  TO  N . VEH. WFN . TYPE , 
FOP  H  *  1  TO  2,  FOR  S  *  I  TO  N. AGENT.  DO 

r=T«T*  a  ttupc  u  r  t  u  tr  r  \J  cu  uar  prf  fffa  itr  T  «  1  1  ut 


LOOP 

READ  AL.HAX. CIST 
LIST  AL.HAX. DIST 
3  ...  3 n i. .  FAv-TCa 
LIST  NAA. FACTOR 
READ  AG. DECAY 
LIST  AG. DECAY 
READ  ABS 
LIST  ABS 

R  E AC  AG. AL. THRESH 
LIST  AG. AL. THRESH 
READ  SKIN 
LIST  SKIN 

READ  AG. INHAL. FACTOR 
LIST  AG. INHAL. FACTOR 
READ  AG.PICKUF 
LIST  AG. PICKUP 
READ  HULT.AG.CECON 
LIST  HULT.AG.DICCN 
REAL  SB. BREATHING 
PRINT  1  LINE  THUS 
ARRAY  SH. BREATHING 

61  ?OR 

62 

63 

64  K.L.SW . EREATHING 


B  n  t  AT  H I  NG 

R  K  *  1  TO  N.  VEH.  SYS.TTFE,  FOR  L  *  1  TO  N.  VEH.  H  PN.  TYPE,  DO 

PRINT  2  LINES  WITH  K , L .SB.  BREATHING (K.L.1) .K.L, SB. BREATHING (K, L ,2)  , 

K.L.SW. BREATHING (K.L, 31 ,  K.L, SB. BRE ATHI NG  (K,  L, 4)  , 

"  *  *"  . "(K.L,  5)  ~  " 


'th6s' 


SB. BREATHING  (**,**,1)  ■  **.  **  (**.**,2) 

Sa.BHEATHING]**:**,'4j  »  **:••  •*',**| 

65  LOO?  .... 


**.*• 
**  '  ■ 


•**  (**.**,3)  -  **.*• 

• 


6*$ 

68 

69 


READ  DCR 
LIST  DCR 
BETOB N 

2ND  "OF  RCOTINZ  OSER2.  INPUT 
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CODE 


1  ROUTINE  NUSSEII  GIVEN  T.CUR,  X.CUR, 

2  YIELDING  CEE. GND  AND  D2P.AIR 

3  •  1  POUTItJ E  PROVIDES  DEPOSITIONS 

<1  PRINT  1  II N I  THUS 

ROUTINE  N  U  S Eli  CAtLID 

5  NORMALLY ,  DIMENSION  IS  0 

6  DEPINE  T.CUR,  X.CUR,  Y.CUR.  DSP 

7  XTHETA,  YTHETA  AS  REAL  VARIK 

8  DEFINE  DEF.3  AND  DEP.A  AS  READ. 

9  DEFISS  AG,  X  AND  I  AS  INTEGER  V 

10  RESERVE  DEP.G(*,*1  AND  DEP.A  (*, 

11  “  ELIMINATE  ALL  BUT  ONE  AGENT 

12  “LIST  AG,  T.CUR 

13  IF  AG  IS  NOT  EQUAL  TO  1,  GO  OUT 

14  ••  START  SIMULATED  PATTERN  AT  T 

15  OTHERWISE  LET  1. ROUND  *  130 

16  IF  T.CUR  IS  LESS  THAN  T. ROUND, 

17  REGARDLESS  LET  DA  *  MAX.F(  0, 

18  LET  DG  *  MIN. F  (  10,  ((T.CUR-T. 

19  FOR  I  *  2  TC  20  ,  DO 

20  “INITIALIZE  GRID  PATTERNLOW 

21  IET  DEP.A(X.I)  *  DA  *  <  (X  - 1  > 

22  LET  DEE.G (X, 1  (  *  DG  *  <  <X-1» 

23  ALSO  PCS  i  -  2  T 0  23,  10 

24  LET  DEP.A  (1,  7)  *  D  A  *  (U 

25  LET  DSP. G  ( 1,Y)  *  DG  *  J1  + 

26  “  SET  UP  REMAINING  GRID 

27  "  START  SIMULATED  PATTER 

28  LET  DEP.A  (X,  Y)  *  DA  *  (X* 

29  LET  0E?.S(Xf?L  *  DG  *  (X* 

30  •  •  INTERPOLATE  VALUE 

31  IF  ((X.CUR  IS  GE  (X-1) )  AND 

32  (Y.CUR  IS  GE  { Y  - 1 )  >  AND 

33  “LIST  X.CUR,  Y.CUR,  X.  Y 

34  LET  XTHETA  =  X.CUR  -  ( 

35  LET  YTH2T A  -  Y.CUR  -  t 

36  LET  GDEP1  =  DEP.GffX-t 


Y.CUR,  AND  AG 
FOR  TESriNG  PROGRAM 


.  GND,  DEP. AIR,  ADEP,  GDEP, 
BLES 

2-DIMENSION.U  VARIABLES 
ARIABLES 
*)  AS  21  BY  21 


LET  GDEP1  = 

LET  GDEP2  = 

LET  EEP.SND 
LET  ADEP1  « 

LET  ADEP2  * 


D3?.G((X-f 
(XTHETA* (D 
0EP.G((X-1 
(XTHETA* (D 
=  0.01  *  f 
DEP. A((X-t 
(XTHEiA*(D 
DEP  .  A  ( ( X- 1 

ixJ!»no 


.CURRENT  *  130 
GO  OUT 

(10- (  (T.  CD R-T.  ROUND)  /DELT)  )  ) 
ROUND) /DELT)  ) 

ER  BOUNDARIES 

:» 

i  r-}\\ 

PATTERN 

N  AT  T. CURRENT  *  130 

y| 

(X.CUR  IS  LT  X)  AND 
(Y.CUR  IS  LT  Y) ) 

X-1) 

Y-  if 

U .  _ _ 


45  LET  DEP. AIR  *  0.001  * 

46  REGARDLESS 

47  LOCP 

48  “LIST  XTHETA.  YIHETA 

49  “LIST  GDEP1  ,GDEF2,ADEP1,ADEE2 

50  LIST  DEP. GND,  DEP. AIR 

51  RETURN 

52  'OUT* 

53  PRINT  1  LINE  THUS 

ROUTINE  NUSSEII  LEFT  -  AG  NE  1  OR  T.CU 

54  LET  DEE. GND  ■  0 

55  LET  DEP. AIR  *  0 

56  RETURN 

57  END  “OF  NOSSEII  ROUTINE 


kjGal)(Y*1))-DEP.G((X-1)  ,  (T-1))  )  ) 

e£.g(x,i)  -dep.g  ( (X-1)  .1) ) ) 

GDEPl  ♦  (ITH2TA*(GDEP5  -  GDEP1 ) )  ) 

)  ,(Y-1))  ♦ 

Ef- MX. (Y-1)  ) -DEP. A ( (X-1) , (1-1))  )) 
(ADE^I  'V  1  YTHETjU* AD&S  V  -*  ADEP  1)  )  ) 


R  LT  130 


294 


1  SOUTINE  ARTILIE5X.es I? SR 

2  IF  T. CURRENT  IS  NOT  EQUAL  TO  130,  RETURN 

■3  rt  "T  u  C  Q  yT  C  7 

4  PRIST  1  ”  1 1 N  E  THUS 
SOUTINE  ARTILLERY.  DRIVER  CALLED’ 

5  POR  I  =  1  IC  6,  DO 

6  LET  A. SOUND  (1,1)  =  122  "A  BATTERY  VOLLEY 

7  LET  A.  SOUND  (1,2)  *  0  "CONVENTIONAL 

8  LOOP 

9  FOR  I  *  7  TO  12,  DO 

10  LET  A. ROUND  (1,1)  *  126  "A  BATTERY  VOLLEY 

11  LET  A.  SCUNE  (1,2)  *  1  "CHEMICAL 

12  LOOP 

13  LET  SDPTR  (SOLDIER)  *  12 

14  LET  ROUND  (SOLDIER)  ■  A.  ROUND  (*) 

15  RETURN 

16  END  "OF  ROUTINE  ARTILLZ  BY  .DRIVE  R 


D£ 


2  PRINT  1  LINS  THt 

ROUTINE  FUNCTION  DISTRT9  CALLED 


ROUTINE. DISTPIB  J  X 


Il5 


3 

4 

5 

6 

7 

8 
9 

10 
1  1 
12 

13 

14 

15 

16 

17 

18 
1  9 
20 
21 
22 

23 

24 

25 

26 

27 

28 


DEFINE  X  AS  i  SEAL,  1-DIUENSION AL  ARRAY 
DEFINE  ANSWER  AS  A  REAL  VARIABLE 
aSSEBVE  XI*)  AS  3 
TO  TC  DISI  (  X  (1)  1 

•  DIST  (1  )  '  "DETESHINISTIC 

LET  ANSWER  =  X(2) 

GO  CUT 

•DIST  (2)'  "UNIFORM 

LET  ANSWER  *  UNIFORM. F(  X  (2)  ,  X  (3)  ,  1) 
GO  C UT 

•DISI  (3)  '  "NORMAL 

LET  ANSWER  *  NORMAL. F(  X{2),  X  ( 3)  ,  1) 
LET  ANSWER  *  MAX.F(  0,  ANSWER  ) 

GO  CUT 

'DIST  (4)'  "LCGNCHMAL 

LET  ANSWER 
GO  CUT 

•  DIST  (5)  '  "EXPONENTIAL 

LET  ANSWER  ■  SX PONENTI AL .  I  {  1(2),  1) 

GO  CUT 

•  DIST  (6 )  '  "BETA 

LET  ANSWER  *  BETA.  F  (  X(2),  X  (3)  ,  1) 

GO  CUT 
•OUT* 

RETURN  WITH  ANSWER 
END  "OF  ROUTINE  CISTBIB 


LCG. NORMAL.  F  (  X  (2)  ,  X  (3)  ,  1) 


a 

1 1 


rir 


C.  7JBIABLES  ESQUIRING  USEE  INPUT 

The  variables  listed  below  require  user  input.  They  are 


efined  in  the  glossary; 

their  usa  i 

s  documented 

ir.  Chapt 

and  Appendix  C. 

1.  Frcbabiliti 

. es  and 

P  robability 

Distribution 

5 

NAME 

TYP  E 

DIMENSION 

MODE 

D.HSKLEAK 

GLOBAL 

V  ARIABLE 

(2-D) 

REAL 

D. PF.LEAK 

G LO  B AL 

V  ARIABLE 

(3-D) 

PEAL 

DT. DECCN 

GLOBAL 

V  ARIABLE 

(4-D) 

REAL 

DT. DETECT 

GIOBAL 

7  ARIABLE 

(5  -D) 

REAL 

DT .  M  AS  K 

GLOBAL 

V  ARIABLE 

(2-D) 

REAL 

DT. NAA 

GLOBAL 

VARIABLE 

(2-D) 

REAL 

DT. CHC 

GLOBAL 

V  ARIABLE 

(3-D) 

REAL 

DT.  P F 

GLOBAL 

VARIABLE 

(4-D) 

REAL 

N. AGENT 

GIOBAL 

VARIABLE 

INTEGER 

N.SIEE 

GLOBAL 

V  ARIABLE 

INTEGER 

N.  VEH.SYS.  TYPE 

GLOBAL 

V  ARIABLE 

INTEGER 

N.  VEH.  WEN.  TYPE 

GLOBAL 

V  ARIABLE 

INTEGER 

PC. ACT. CHC 

GLOBAL 

V  ARIABLE 

(2-D) 

PEAL 

PC. DEL. CFCCN 

GLOBAL 

V  ARIABLE 

(1-D) 

REAL 

PC. IMM. DECCN 

GLOBAL 

V  ARIABLE 

(1-D) 

REAL 

PC. MASK 

GLOBAL 

V  ARIABLE 

(1-D) 

REAL 

PC. acpp 

GLOBAL 

V  ARIABLE 

(1-D) 

REAL 

PC . MSKLEAK 

GLOBAL 

V  ARIABLE 

(1-D) 

REAL 

PC. NAA 

GLOBAL 

V  ARIABLE 

(1-D) 

REAL 

PC. CHC 

GLOBAL 

V  ARIABLE 

(1-D) 

REAL 

EC. PF. LEAK 

GLOBAL 

V  ARIABLE 

(2-D) 

REAL 
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2  .  Ehysxcai  Co  nstants  and  Character 1st ics 


NAME 

TYPE 

DIMENSION 

MODE 

ABS 

GICBAL 

V  ABI ABLE 

<1-D) 

REAL 

AG. AL. THRESH 

GLOBAL 

V  ARIABLE 

(2-D) 

REAL 

AG. DECAY 

GLOBAL 

Y  ARIABLE 

(1-D) 

REAL 

AG. INHAL. FACTOR 

GLOBAL 

V  ARIABLE 

(1-D) 

REAL 

AG. PICKUP 

GLOBAL 

V  ARIABLE 

(1-D) 

REAL 

AL.MAX.DIST 

GLOBAL 

V  ARIABLE 

(1-D) 

REAL 

DCR 

GLCEAL 

Y  ARIABLE 

(1-D) 

PEAL 

DSP. BED 

GLOBAL 

V  AHIABLE 

(3-D) 

REAL 

MIN . A.CHEM 

GLOBAL 

V  ARIABLE 

(1-D) 

REAL 

MIN . G. CEEM 

GLOBAL 

'/  ARIABLE 

O-D) 

REAL 

MULT .AG. CECON 

GLOBAL 

Y  ARIABLE 

n  -D) 

REAL 

N. AGENT 

GLOBAL 

VARIABLE 

INTEGER 

N.  SICE 

GLOBAL 

Y  ARIABLE 

INTEGER 

N.VEH.SYS.  TYPE 

GLOBAL 

V  ARIABLE 

INTEGER 

N.VEH.WFN.  TYPE 

GLOBAL 

Y  ARIABLE 

INTEGER 

NA A . FACTCB 

GLOBAL 

Y  ARIABLE 

P-D) 

PEAL 

PF. MAX 

GLOBAL 

V  ARIABLE 

(2-D) 

REAL 

SKIN 

GLOBAL 

Y  ARIABLE 

(2-D) 

REAL 

SW. BREATHING 

GLOBAL 

Y  ARIABLE 

(3-D) 

REAL 

SW. NEC.  FILTER 

GLOBAL 

V  ARIABLE 

(6  -D) 

REAL 
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15.  Director  1 

Combined  Arms  Combat  Development  Activity 

ATTN:  ATZL-CAC-A  (Hr.  Lee  Plegier) 

Ft.  Leavenworth,  Kansas  66027 

16.  Director  1 

Combat  Analysis  Office 

ATTN:  Mr.  Kent  Pickett 
US  Army  Combined  Arms  Center 
Ft.  Leavenworth,  Kansas  66027 

17.  Command  and  General  Staff  College  1 

ATTN:  Education  Advisor 

Rcom  123,  Bell  Hall 

Ft.  Leavenworth,  Kansas  66027 

18.  Dr.  Siltur  Payne,  Director  1 

US  Army  TRADOC  Systems  Analysis  Activity 

White  Sands  Missile  Range,  New  Mexico  8«002 

19.  Ccmmander  1 

US  Armv  Concepts  and  Analysis  Acrency 

ATTN:  SCCA-WG 

8120  Wccdmont  Avenue 

Eethesda,  Maryland  20014 

20.  Director  1 

USATEAS ANA 

ATTN:  Mr.  Ray  Heath 

White  Sands  Missile  Range,  New  Mexico  88002 

21.  Director  1 

USATEASANA 

ATTN:  A IGH-T08  (Mr.  Lui  s  Dominguez) 

White  Sands  Missile  Range,  New  Mexico  38002 

22.  Director  .  1 

Combat  Developments,  Studies  Division 

US  Army  Armor  Agency 
Ft.  Knox,  Kentucky  4012  1 

23.  Director  1 

Combat  Developments 

US  Army  Field  Artillery  School 
Ft.  Sill,  Oklahoma  73503 

24.  Director  1 

Combat  Developments 

US  Army  Infantry  School 
Ft.  Henning,  Georgia  31905 

25.  Lawrence  Livermore  National  Laboratory  1 

ATTN:  Don  Blumenthal,  Station  L-7 

Box  808 

Livermore,  California  94550 
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